home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 4 / BBS in a Box - Macintosh - Volume IV (January 1992) (BBS in a Box).iso / Files / Bus / A / almanac 1.5 .cpt / Almanac v 1.5 < prev   
MacBinary  |  1989-01-02  |  42.8 KB  |  [STAK/WILD]

open in: MacOS 8.1     |     Win98     |     DOS

browse contents    |     view JSON data     |     view as text


This file was processed as: MacBinary (archive/macBinary).

ConfidenceProgramDetectionMatch TypeSupport
100% dexvert HyperCard Stack (archive/hypercard) idMeta Supported
10% dexvert MacBinary (archive/macBinary) fallback Supported
100% file MacBinary II, inited, Mon Jan 2 13:29:39 1989, modified Mon Jan 2 13:29:39 1989, creator HyperCard, type HyperCard stack, 40768 bytes "Almanac v 1.5" , at 0x9fc0 2693 bytes resource default (weak)
99% file data default
74% TrID Mac HyperCard stack (MacBinary) default
25% TrID MacBinary 2 default (weak)
100% lsar MacBinary default


id metadata
keyvalue
macFileType[STAK]
macFileCreator[WILD]



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0d 41 6c 6d 61 6e 61 | 63 20 76 20 31 2e 35 00 |..Almana|c v 1.5.|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 53 54 41 4b 57 49 4c | 44 01 00 00 00 00 00 00 |.STAKWIL|D.......|
|00000050| 00 00 00 00 00 9f 40 00 | 00 0a 85 9f e5 70 13 9f |......@.|.....p..|
|00000060| e5 70 13 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.p......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 a7 2a 00 00 |........|.....*..|
|00000080| 00 00 22 00 53 54 41 4b | ff ff ff ff e7 e8 c5 5b |..".STAK|.......[|
|00000090| 00 00 00 08 00 00 9f 40 | 00 00 22 00 00 00 00 00 |.......@|..".....|
|000000a0| 00 00 00 00 00 00 00 03 | 00 00 0a cd 00 00 00 0c |........|........|
|000000b0| 00 00 0b 96 00 00 1e db | 00 00 00 00 00 00 00 00 |........|........|
|000000c0| 00 00 00 00 00 00 00 00 | 00 05 00 00 10 00 00 00 |........|........|
|000000d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000e0| 00 00 00 00 01 20 80 00 | 01 20 80 00 01 20 80 00 |..... ..|. ... ..|
|000000f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000100| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000110| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000120| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000140| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000200| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000210| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000220| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000230| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000240| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000250| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000270| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000280| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000290| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000300| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000310| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000320| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000340| 00 00 00 00 00 00 00 00 | 80 00 00 00 08 00 00 00 |........|........|
|00000350| 88 00 22 00 88 00 22 00 | 88 88 22 22 88 88 22 22 |.."...".|..""..""|
|00000360| 88 aa 22 aa 88 aa 22 aa | cc aa 33 aa cc aa 33 aa |.."...".|..3...3.|
|00000370| ee aa bb aa ee aa bb aa | ee bb bb ee ee bb bb ee |........|........|
|00000380| ff bb ff ee ff bb ff ee | ff bb ff ff ff bb ff ff |........|........|
|00000390| 80 10 02 20 01 08 40 04 | ff ff ff ff ff ff ff ff |... ..@.|........|
|000003a0| 88 22 88 22 88 22 88 22 | 11 22 44 88 11 22 44 88 |."."."."|."D.."D.|
|000003b0| c4 80 0c 68 43 02 30 26 | b1 30 03 1b d8 c0 0c 8d |...hC.0&|.0......|
|000003c0| aa 00 aa 00 aa 00 aa 00 | 88 22 55 22 88 22 55 22 |........|."U"."U"|
|000003d0| 88 55 22 55 88 55 22 55 | 77 dd 77 dd 77 dd 77 dd |.U"U.U"U|w.w.w.w.|
|000003e0| 80 00 00 00 00 00 00 00 | aa 55 aa 55 aa 55 aa 55 |........|.U.U.U.U|
|000003f0| 03 84 48 30 0c 02 01 01 | 82 44 39 44 82 01 01 01 |..H0....|.D9D....|
|00000400| 88 14 22 41 88 41 22 14 | 80 80 41 3e 08 08 14 e3 |.."A.A".|..A>....|
|00000410| 22 04 8c 74 22 17 98 10 | be 80 88 08 eb 08 88 80 |"..t"...|........|
|00000420| 25 c8 32 89 64 24 4c 92 | a2 9c 41 be 2a c9 14 eb |%.2.d$L.|..A.*...|
|00000430| 40 a0 00 00 04 0a 00 00 | 80 40 20 00 02 04 08 00 |@.......|.@ .....|
|00000440| aa 00 80 00 88 00 80 00 | ff 80 80 80 80 80 80 80 |........|........|
|00000450| 08 1c 22 c1 80 01 02 04 | ff 80 80 80 ff 08 08 08 |..".....|........|
|00000460| f8 74 22 47 8f 17 22 71 | bf 00 bf bf b0 b0 b0 b0 |.t"G.."q|........|
|00000470| ff 7f be 5d a2 41 80 00 | fa f5 fa f5 a0 50 a0 50 |...].A..|.....P.P|
|00000480| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000490| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000500| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000510| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000520| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000530| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000540| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000550| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000560| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000570| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000580| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000590| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000600| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000610| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000620| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000630| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000640| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000650| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000660| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000670| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000680| 6f 6e 20 6f 70 65 6e 53 | 74 61 63 6b 0d 67 6c 6f |on openS|tack.glo|
|00000690| 62 61 6c 20 76 61 6c 2c | 66 6f 72 63 65 0d 70 75 |bal val,|force.pu|
|000006a0| 74 20 30 20 69 6e 74 6f | 20 66 6f 72 63 65 0d 68 |t 0 into| force.h|
|000006b0| 69 64 65 20 6d 65 73 73 | 61 67 65 20 62 6f 78 0d |ide mess|age box.|
|000006c0| 68 69 64 65 20 66 69 65 | 6c 64 20 72 65 6d 0d 70 |hide fie|ld rem.p|
|000006d0| 75 74 20 74 68 65 20 73 | 65 63 6f 6e 64 73 2f 38 |ut the s|econds/8|
|000006e0| 36 34 30 30 20 2b 20 31 | 36 34 38 30 2e 35 20 2b |6400 + 1|6480.5 +|
|000006f0| 20 35 2f 32 34 20 69 6e | 74 6f 20 6a 64 32 0d 70 | 5/24 in|to jd2.p|
|00000700| 75 74 20 74 72 75 6e 63 | 28 6a 64 32 2b 32 34 30 |ut trunc|(jd2+240|
|00000710| 30 30 30 30 30 29 20 2b | 31 20 69 6e 74 6f 20 6a |00000) +|1 into j|
|00000720| 64 0d 67 65 74 20 74 68 | 65 20 64 61 74 65 0d 63 |d.get th|e date.c|
|00000730| 6f 6e 76 65 72 74 20 69 | 74 20 74 6f 20 64 61 74 |onvert i|t to dat|
|00000740| 65 49 74 65 6d 73 0d 70 | 75 74 20 69 74 65 6d 20 |eItems.p|ut item |
|00000750| 32 20 6f 66 20 69 74 20 | 69 6e 74 6f 20 6d 0d 70 |2 of it |into m.p|
|00000760| 75 74 20 69 74 65 6d 20 | 33 20 6f 66 20 69 74 20 |ut item |3 of it |
|00000770| 69 6e 74 6f 20 64 0d 70 | 75 74 20 66 61 6c 73 65 |into d.p|ut false|
|00000780| 20 69 6e 74 6f 20 76 61 | 6c 0d 69 66 20 6d 3e 34 | into va|l.if m>4|
|00000790| 20 61 6e 64 20 6d 3c 3d | 31 30 20 74 68 65 6e 20 | and m<=|10 then |
|000007a0| 70 75 74 20 74 72 75 65 | 20 69 6e 74 6f 20 76 61 |put true| into va|
|000007b0| 6c 0d 70 75 74 20 74 72 | 75 6e 63 28 6a 64 2d 37 |l.put tr|unc(jd-7|
|000007c0| 2a 74 72 75 6e 63 28 6a | 64 2f 37 29 29 20 69 6e |*trunc(j|d/7)) in|
|000007d0| 74 6f 20 77 0d 69 66 20 | 6d 3d 34 20 61 6e 64 20 |to w.if |m=4 and |
|000007e0| 64 3e 77 20 74 68 65 6e | 20 70 75 74 20 74 72 75 |d>w then| put tru|
|000007f0| 65 20 69 6e 74 6f 20 76 | 61 6c 0d 69 66 20 6d 3d |e into v|al.if m=|
|00000800| 31 30 20 61 6e 64 20 28 | 64 2d 77 29 3e 3d 32 35 |10 and (|d-w)>=25|
|00000810| 20 74 68 65 6e 20 70 75 | 74 20 66 61 6c 73 65 20 | then pu|t false |
|00000820| 69 6e 74 6f 20 76 61 6c | 0d 70 75 73 68 20 63 61 |into val|.push ca|
|00000830| 72 64 0d 69 66 20 74 68 | 65 20 6e 75 6d 62 65 72 |rd.if th|e number|
|00000840| 20 6f 66 20 74 68 69 73 | 20 63 64 20 69 73 20 31 | of this| cd is 1|
|00000850| 20 74 68 65 6e 0d 70 75 | 74 20 6c 69 6e 65 20 32 | then.pu|t line 2|
|00000860| 20 6f 66 20 63 61 72 64 | 20 66 69 65 6c 64 20 22 | of card| field "|
|00000870| 41 6c 67 6f 6c 22 20 69 | 6e 74 6f 20 65 63 6c 0d |Algol" i|nto ecl.|
|00000880| 72 65 70 65 61 74 0d 69 | 66 20 65 63 6c 20 3e 20 |repeat.i|f ecl > |
|00000890| 6a 64 32 20 74 68 65 6e | 20 65 78 69 74 20 72 65 |jd2 then| exit re|
|000008a0| 70 65 61 74 0d 61 64 64 | 20 32 2e 38 36 37 33 30 |peat.add| 2.86730|
|000008b0| 37 35 20 74 6f 20 65 63 | 6c 0d 65 6e 64 20 72 65 |75 to ec|l.end re|
|000008c0| 70 65 61 74 0d 73 65 74 | 20 6e 75 6d 62 65 72 46 |peat.set| numberF|
|000008d0| 6f 72 6d 61 74 20 74 6f | 20 22 30 2e 30 22 0d 70 |ormat to| "0.0".p|
|000008e0| 75 74 20 22 4e 65 78 74 | 20 6d 69 6e 69 6d 75 6d |ut "Next| minimum|
|000008f0| 20 6f 66 20 41 6c 67 6f | 6c 20 6f 63 63 75 72 73 | of Algo|l occurs|
|00000900| 20 69 6e 22 20 26 26 20 | 28 65 63 6c 2d 6a 64 32 | in" && |(ecl-jd2|
|00000910| 29 2a 32 34 20 26 26 c2 | 0d 22 68 6f 75 72 73 20 |)*24 &&.|."hours |
|00000920| 61 74 20 4a 44 3d 22 20 | 69 6e 74 6f 20 6c 69 6e |at JD=" |into lin|
|00000930| 65 20 31 20 6f 66 20 63 | 61 72 64 20 66 69 65 6c |e 1 of c|ard fiel|
|00000940| 64 20 41 6c 67 6f 6c 0d | 73 65 74 20 6e 75 6d 62 |d Algol.|set numb|
|00000950| 65 72 46 6f 72 6d 61 74 | 20 74 6f 20 22 30 2e 23 |erFormat| to "0.#|
|00000960| 23 23 22 0d 70 75 74 20 | 65 63 6c 2b 32 34 30 30 |##".put |ecl+2400|
|00000970| 30 30 30 20 61 66 74 65 | 72 20 6c 69 6e 65 20 31 |000 afte|r line 1|
|00000980| 20 6f 66 20 63 61 72 64 | 20 66 69 65 6c 64 20 41 | of card| field A|
|00000990| 6c 67 6f 6c 0d 70 75 74 | 20 65 63 6c 20 69 6e 74 |lgol.put| ecl int|
|000009a0| 6f 20 6c 69 6e 65 20 32 | 20 6f 66 20 63 61 72 64 |o line 2| of card|
|000009b0| 20 66 69 65 6c 64 20 41 | 6c 67 6f 6c 0d 65 6e 64 | field A|lgol.end|
|000009c0| 20 69 66 0d 73 65 74 20 | 6e 75 6d 62 65 72 46 6f | if.set |numberFo|
|000009d0| 72 6d 61 74 20 74 6f 20 | 22 30 2e 23 23 23 23 23 |rmat to |"0.#####|
|000009e0| 23 22 0d 65 6e 64 20 6f | 70 65 6e 53 74 61 63 6b |#".end o|penStack|
|000009f0| 0d 0d 66 75 6e 63 74 69 | 6f 6e 20 54 4a 44 44 61 |..functi|on TJDDa|
|00000a00| 74 65 0d 67 65 74 20 74 | 68 65 20 73 65 63 6f 6e |te.get t|he secon|
|00000a10| 64 73 0d 61 64 64 20 38 | 36 34 30 30 2b 33 36 30 |ds.add 8|6400+360|
|00000a20| 30 2a 28 31 32 2b 44 53 | 54 63 68 65 63 6b 28 29 |0*(12+DS|Tcheck()|
|00000a30| 29 20 74 6f 20 69 74 0d | 63 6f 6e 76 65 72 74 20 |) to it.|convert |
|00000a40| 69 74 20 74 6f 20 6c 6f | 6e 67 20 64 61 74 65 0d |it to lo|ng date.|
|00000a50| 70 75 74 20 63 68 61 72 | 20 31 20 74 6f 20 28 6f |put char| 1 to (o|
|00000a60| 66 66 73 65 74 28 22 2c | 22 2c 74 68 69 72 64 20 |ffset(",|",third |
|00000a70| 77 6f 72 64 20 6f 66 20 | 69 74 29 2d 31 29 20 6f |word of |it)-1) o|
|00000a80| 66 20 74 68 69 72 64 20 | 77 6f 72 64 20 6f 66 20 |f third |word of |
|00000a90| 69 74 20 c2 0d 26 26 20 | 73 65 63 6f 6e 64 20 77 |it ..&& |second w|
|00000aa0| 6f 72 64 20 6f 66 20 69 | 74 20 26 26 20 6c 61 73 |ord of i|t && las|
|00000ab0| 74 20 77 6f 72 64 20 6f | 66 20 69 74 20 69 6e 74 |t word o|f it int|
|00000ac0| 6f 20 68 65 0d 72 65 74 | 75 72 6e 20 68 65 0d 65 |o he.ret|urn he.e|
|00000ad0| 6e 64 20 54 4a 44 44 61 | 74 65 0d 0d 66 75 6e 63 |nd TJDDa|te..func|
|00000ae0| 74 69 6f 6e 20 67 65 74 | 44 61 74 65 0d 67 65 74 |tion get|Date.get|
|00000af0| 20 74 68 65 20 6c 6f 6e | 67 20 64 61 74 65 0d 70 | the lon|g date.p|
|00000b00| 75 74 20 63 68 61 72 20 | 31 20 74 6f 20 28 6f 66 |ut char |1 to (of|
|00000b10| 66 73 65 74 28 22 2c 22 | 2c 74 68 69 72 64 20 77 |fset(","|,third w|
|00000b20| 6f 72 64 20 6f 66 20 69 | 74 29 2d 31 29 20 6f 66 |ord of i|t)-1) of|
|00000b30| 20 74 68 69 72 64 20 77 | 6f 72 64 20 6f 66 20 69 | third w|ord of i|
|00000b40| 74 20 c2 0d 26 26 20 73 | 65 63 6f 6e 64 20 77 6f |t ..&& s|econd wo|
|00000b50| 72 64 20 6f 66 20 69 74 | 20 26 26 20 6c 61 73 74 |rd of it| && last|
|00000b60| 20 77 6f 72 64 20 6f 66 | 20 69 74 20 69 6e 74 6f | word of| it into|
|00000b70| 20 68 65 0d 72 65 74 75 | 72 6e 20 68 65 0d 65 6e | he.retu|rn he.en|
|00000b80| 64 20 67 65 74 44 61 74 | 65 0d 0d 66 75 6e 63 74 |d getDat|e..funct|
|00000b90| 69 6f 6e 20 67 65 74 4a | 44 44 61 74 65 0d 67 65 |ion getJ|DDate.ge|
|00000ba0| 74 20 74 68 65 20 73 65 | 63 6f 6e 64 73 0d 61 64 |t the se|conds.ad|
|00000bb0| 64 20 33 36 30 30 2a 28 | 31 32 2b 44 53 54 63 68 |d 3600*(|12+DSTch|
|00000bc0| 65 63 6b 28 29 29 20 74 | 6f 20 69 74 0d 63 6f 6e |eck()) t|o it.con|
|00000bd0| 76 65 72 74 20 69 74 20 | 74 6f 20 6c 6f 6e 67 20 |vert it |to long |
|00000be0| 64 61 74 65 0d 70 75 74 | 20 63 68 61 72 20 31 20 |date.put| char 1 |
|00000bf0| 74 6f 20 28 6f 66 66 73 | 65 74 28 22 2c 22 2c 74 |to (offs|et(",",t|
|00000c00| 68 69 72 64 20 77 6f 72 | 64 20 6f 66 20 69 74 29 |hird wor|d of it)|
|00000c10| 2d 31 29 20 6f 66 20 74 | 68 69 72 64 20 77 6f 72 |-1) of t|hird wor|
|00000c20| 64 20 6f 66 20 69 74 20 | c2 0d 26 26 20 73 65 63 |d of it |..&& sec|
|00000c30| 6f 6e 64 20 77 6f 72 64 | 20 6f 66 20 69 74 20 26 |ond word| of it &|
|00000c40| 26 20 6c 61 73 74 20 77 | 6f 72 64 20 6f 66 20 69 |& last w|ord of i|
|00000c50| 74 20 69 6e 74 6f 20 68 | 65 0d 72 65 74 75 72 6e |t into h|e.return|
|00000c60| 20 68 65 0d 65 6e 64 20 | 67 65 74 4a 44 44 61 74 | he.end |getJDDat|
|00000c70| 65 0d 0d 66 75 6e 63 74 | 69 6f 6e 20 67 65 74 55 |e..funct|ion getU|
|00000c80| 54 44 61 74 65 0d 67 65 | 74 20 74 68 65 20 73 65 |TDate.ge|t the se|
|00000c90| 63 6f 6e 64 73 0d 61 64 | 64 20 33 36 30 30 2a 28 |conds.ad|d 3600*(|
|00000ca0| 44 53 54 63 68 65 63 6b | 28 29 29 20 74 6f 20 69 |DSTcheck|()) to i|
|00000cb0| 74 0d 63 6f 6e 76 65 72 | 74 20 69 74 20 74 6f 20 |t.conver|t it to |
|00000cc0| 6c 6f 6e 67 20 64 61 74 | 65 0d 70 75 74 20 63 68 |long dat|e.put ch|
|00000cd0| 61 72 20 31 20 74 6f 20 | 28 6f 66 66 73 65 74 28 |ar 1 to |(offset(|
|00000ce0| 22 2c 22 2c 74 68 69 72 | 64 20 77 6f 72 64 20 6f |",",thir|d word o|
|00000cf0| 66 20 69 74 29 2d 31 29 | 20 6f 66 20 74 68 69 72 |f it)-1)| of thir|
|00000d00| 64 20 77 6f 72 64 20 6f | 66 20 69 74 20 c2 0d 26 |d word o|f it ..&|
|00000d10| 26 20 73 65 63 6f 6e 64 | 20 77 6f 72 64 20 6f 66 |& second| word of|
|00000d20| 20 69 74 20 26 26 20 6c | 61 73 74 20 77 6f 72 64 | it && l|ast word|
|00000d30| 20 6f 66 20 69 74 20 69 | 6e 74 6f 20 68 65 0d 72 | of it i|nto he.r|
|00000d40| 65 74 75 72 6e 20 68 65 | 0d 65 6e 64 20 67 65 74 |eturn he|.end get|
|00000d50| 55 54 44 61 74 65 0d 0d | 66 75 6e 63 74 69 6f 6e |UTDate..|function|
|00000d60| 20 44 53 54 63 68 65 63 | 6b 0d 67 65 74 20 66 69 | DSTchec|k.get fi|
|00000d70| 72 73 74 20 77 6f 72 64 | 20 6f 66 20 6c 69 6e 65 |rst word| of line|
|00000d80| 20 34 20 6f 66 20 63 61 | 72 64 20 66 69 65 6c 64 | 4 of ca|rd field|
|00000d90| 20 43 6f 6f 72 64 73 20 | 6f 66 20 66 69 72 73 74 | Coords |of first|
|00000da0| 20 63 64 0d 69 66 20 68 | 69 6c 69 74 65 20 6f 66 | cd.if h|ilite of|
|00000db0| 20 62 6b 67 6e 64 20 62 | 75 74 74 6f 6e 20 22 44 | bkgnd b|utton "D|
|00000dc0| 53 54 22 0d 74 68 65 6e | 20 70 75 74 20 69 74 2d |ST".then| put it-|
|00000dd0| 31 20 69 6e 74 6f 20 74 | 65 6d 70 0d 65 6c 73 65 |1 into t|emp.else|
|00000de0| 20 70 75 74 20 69 74 20 | 69 6e 74 6f 20 74 65 6d | put it |into tem|
|00000df0| 70 0d 72 65 74 75 72 6e | 20 74 65 6d 70 0d 65 6e |p.return| temp.en|
|00000e00| 64 20 44 53 54 63 68 65 | 63 6b 0d 0d 6f 6e 20 64 |d DSTche|ck..on d|
|00000e10| 61 79 4f 66 59 65 61 72 | 0d 2d 2d 20 72 65 74 75 |ayOfYear|.-- retu|
|00000e20| 72 6e 73 20 64 61 79 2c | 20 64 61 79 55 54 20 61 |rns day,| dayUT a|
|00000e30| 73 20 6e 75 6d 62 65 72 | 20 6f 66 20 64 61 79 20 |s number| of day |
|00000e40| 69 6e 20 79 65 61 72 0d | 67 6c 6f 62 61 6c 20 64 |in year.|global d|
|00000e50| 61 79 55 54 2c 64 61 79 | 2c 64 61 79 53 65 63 73 |ayUT,day|,daySecs|
|00000e60| 0d 70 75 74 20 74 68 65 | 20 64 61 74 65 20 69 6e |.put the| date in|
|00000e70| 74 6f 20 64 61 79 53 65 | 63 73 0d 63 6f 6e 76 65 |to daySe|cs.conve|
|00000e80| 72 74 20 64 61 79 53 65 | 63 73 20 74 6f 20 73 65 |rt daySe|cs to se|
|00000e90| 63 6f 6e 64 73 0d 70 75 | 74 20 6e 75 6d 62 65 72 |conds.pu|t number|
|00000ea0| 20 6f 66 20 63 68 61 72 | 73 20 6f 66 20 74 68 65 | of char|s of the|
|00000eb0| 20 64 61 74 65 20 69 6e | 74 6f 20 6e 64 61 74 65 | date in|to ndate|
|00000ec0| 0d 70 75 74 20 22 31 32 | 2f 33 31 2f 22 20 26 20 |.put "12|/31/" & |
|00000ed0| 28 63 68 61 72 20 6e 64 | 61 74 65 2d 31 20 74 6f |(char nd|ate-1 to|
|00000ee0| 20 6e 64 61 74 65 20 6f | 66 20 74 68 65 20 64 61 | ndate o|f the da|
|00000ef0| 74 65 29 2d 31 20 69 6e | 74 6f 20 4a 61 6e 30 0d |te)-1 in|to Jan0.|
|00000f00| 63 6f 6e 76 65 72 74 20 | 4a 61 6e 30 20 74 6f 20 |convert |Jan0 to |
|00000f10| 73 65 63 6f 6e 64 73 0d | 70 75 74 20 28 64 61 79 |seconds.|put (day|
|00000f20| 53 65 63 73 2d 4a 61 6e | 30 29 2f 38 36 34 30 30 |Secs-Jan|0)/86400|
|00000f30| 20 69 6e 74 6f 20 64 61 | 79 0d 70 75 74 20 28 64 | into da|y.put (d|
|00000f40| 61 79 53 65 63 73 2d 4a | 61 6e 30 2b 33 36 30 30 |aySecs-J|an0+3600|
|00000f50| 2a 44 53 54 63 68 65 63 | 6b 28 29 29 2f 38 36 34 |*DSTchec|k())/864|
|00000f60| 30 30 20 69 6e 74 6f 20 | 64 61 79 55 54 0d 65 6e |00 into |dayUT.en|
|00000f70| 64 20 64 61 79 4f 66 59 | 65 61 72 0d 0d 6f 6e 20 |d dayOfY|ear..on |
|00000f80| 63 68 65 62 20 61 2c 62 | 2c 63 0d 67 6c 6f 62 61 |cheb a,b|,c.globa|
|00000f90| 6c 20 78 2c 78 61 2c 78 | 62 0d 70 75 74 20 32 2a |l x,xa,x|b.put 2*|
|00000fa0| 78 2a 61 2d 62 2b 63 20 | 69 6e 74 6f 20 74 65 6d |x*a-b+c |into tem|
|00000fb0| 70 0d 70 75 74 20 61 20 | 69 6e 74 6f 20 78 62 0d |p.put a |into xb.|
|00000fc0| 70 75 74 20 74 65 6d 70 | 20 69 6e 74 6f 20 78 61 |put temp| into xa|
|00000fd0| 0d 65 6e 64 20 63 68 65 | 62 0d 0d 6f 6e 20 55 54 |.end che|b..on UT|
|00000fe0| 0d 67 6c 6f 62 61 6c 20 | 64 61 79 2c 64 61 79 53 |.global |day,dayS|
|00000ff0| 65 63 73 2c 78 2c 78 61 | 2c 78 62 2c 6d 0d 64 61 |ecs,x,xa|,xb,m.da|
|00001000| 79 4f 66 59 65 61 72 20 | 2d 2d 20 67 65 74 73 20 |yOfYear |-- gets |
|00001010| 64 61 79 53 65 63 73 0d | 67 65 74 20 28 28 74 68 |daySecs.|get ((th|
|00001020| 65 20 73 65 63 6f 6e 64 | 73 2d 64 61 79 53 65 63 |e second|s-daySec|
|00001030| 73 29 2f 33 36 30 30 2b | 44 53 54 63 68 65 63 6b |s)/3600+|DSTcheck|
|00001040| 28 29 29 6d 6f 64 20 32 | 34 0d 70 75 74 20 74 72 |())mod 2|4.put tr|
|00001050| 75 6e 63 28 69 74 29 20 | 69 6e 74 6f 20 68 0d 70 |unc(it) |into h.p|
|00001060| 75 74 20 74 72 75 6e 63 | 28 36 30 2a 28 69 74 2d |ut trunc|(60*(it-|
|00001070| 68 29 29 20 69 6e 74 6f | 20 6d 0d 69 66 20 6d 3c |h)) into| m.if m<|
|00001080| 31 30 20 74 68 65 6e 20 | 70 75 74 20 22 30 22 20 |10 then |put "0" |
|00001090| 62 65 66 6f 72 65 20 6d | 0d 70 75 74 20 22 55 6e |before m|.put "Un|
|000010a0| 69 76 65 72 73 61 6c 20 | 54 69 6d 65 20 3d 20 22 |iversal |Time = "|
|000010b0| 26 20 68 20 26 22 3a 22 | 20 26 20 6d 20 69 6e 74 |& h &":"| & m int|
|000010c0| 6f 20 6c 69 6e 65 20 31 | 20 6f 66 20 66 69 65 6c |o line 1| of fiel|
|000010d0| 64 20 31 0d 70 75 74 20 | 69 74 20 69 6e 74 6f 20 |d 1.put |it into |
|000010e0| 6c 69 6e 65 20 32 20 6f | 66 20 66 69 65 6c 64 20 |line 2 o|f field |
|000010f0| 31 0d 65 6e 64 20 55 54 | 0d 0d 6f 6e 20 53 54 0d |1.end UT|..on ST.|
|00001100| 67 6c 6f 62 61 6c 20 64 | 61 79 2c 64 61 79 53 65 |global d|ay,daySe|
|00001110| 63 73 2c 78 2c 78 61 2c | 78 62 2c 64 61 79 55 54 |cs,x,xa,|xb,dayUT|
|00001120| 0d 64 61 79 4f 66 59 65 | 61 72 20 2d 2d 20 67 65 |.dayOfYe|ar -- ge|
|00001130| 74 73 20 64 61 79 0d 70 | 75 74 20 28 64 61 79 55 |ts day.p|ut (dayU|
|00001140| 54 2d 31 29 2f 31 38 33 | 2d 31 20 69 6e 74 6f 20 |T-1)/183|-1 into |
|00001150| 78 0d 70 75 74 20 30 20 | 69 6e 74 6f 20 61 0d 70 |x.put 0 |into a.p|
|00001160| 75 74 20 30 20 69 6e 74 | 6f 20 62 0d 70 75 74 20 |ut 0 int|o b.put |
|00001170| 37 20 69 6e 74 6f 20 69 | 0d 72 65 70 65 61 74 20 |7 into i|.repeat |
|00001180| 75 6e 74 69 6c 20 69 3d | 30 0d 63 68 65 62 20 61 |until i=|0.cheb a|
|00001190| 2c 62 2c 77 6f 72 64 20 | 69 2b 31 20 6f 66 20 63 |,b,word |i+1 of c|
|000011a0| 61 72 64 20 66 69 65 6c | 64 20 22 53 69 64 65 72 |ard fiel|d "Sider|
|000011b0| 65 61 6c 20 43 68 65 62 | 22 20 6f 66 20 63 61 72 |eal Cheb|" of car|
|000011c0| 64 20 31 0d 70 75 74 20 | 78 61 20 69 6e 74 6f 20 |d 1.put |xa into |
|000011d0| 61 0d 70 75 74 20 78 62 | 20 69 6e 74 6f 20 62 0d |a.put xb| into b.|
|000011e0| 73 75 62 74 72 61 63 74 | 20 31 20 66 72 6f 6d 20 |subtract| 1 from |
|000011f0| 69 0d 65 6e 64 20 72 65 | 70 65 61 74 0d 70 75 74 |i.end re|peat.put|
|00001200| 20 78 62 20 69 6e 74 6f | 20 62 32 0d 63 68 65 62 | xb into| b2.cheb|
|00001210| 20 61 2c 62 2c 77 6f 72 | 64 20 31 20 6f 66 20 63 | a,b,wor|d 1 of c|
|00001220| 61 72 64 20 66 69 65 6c | 64 20 22 53 69 64 65 72 |ard fiel|d "Sider|
|00001230| 65 61 6c 20 43 68 65 62 | 22 20 6f 66 20 63 61 72 |eal Cheb|" of car|
|00001240| 64 20 31 0d 67 65 74 20 | 28 28 78 61 2d 62 32 29 |d 1.get |((xa-b2)|
|00001250| 2f 32 2b 28 28 74 68 65 | 20 73 65 63 6f 6e 64 73 |/2+((the| seconds|
|00001260| 2d 64 61 79 53 65 63 73 | 29 2f 33 36 30 30 2b 44 |-daySecs|)/3600+D|
|00001270| 53 54 63 68 65 63 6b 28 | 29 29 2a 31 2e 30 30 32 |STcheck(|))*1.002|
|00001280| 37 33 37 39 31 2d c2 0d | 28 6c 69 6e 65 20 32 20 |73791-..|(line 2 |
|00001290| 6f 66 20 63 61 72 64 20 | 66 69 65 6c 64 20 22 63 |of card |field "c|
|000012a0| 6f 6f 72 64 73 22 20 6f | 66 20 63 61 72 64 20 31 |oords" o|f card 1|
|000012b0| 29 2f 31 35 2b 32 34 29 | 20 6d 6f 64 20 32 34 0d |)/15+24)| mod 24.|
|000012c0| 70 75 74 20 74 72 75 6e | 63 28 69 74 29 20 69 6e |put trun|c(it) in|
|000012d0| 74 6f 20 68 0d 70 75 74 | 20 74 72 75 6e 63 28 36 |to h.put| trunc(6|
|000012e0| 30 2a 28 69 74 2d 68 29 | 29 20 69 6e 74 6f 20 6d |0*(it-h)|) into m|
|000012f0| 0d 69 66 20 6d 3c 31 30 | 20 74 68 65 6e 20 70 75 |.if m<10| then pu|
|00001300| 74 20 22 30 22 20 62 65 | 66 6f 72 65 20 6d 0d 70 |t "0" be|fore m.p|
|00001310| 75 74 20 22 53 69 64 65 | 72 65 61 6c 20 54 69 6d |ut "Side|real Tim|
|00001320| 65 20 3d 20 22 26 20 68 | 20 26 22 3a 22 20 26 20 |e = "& h| &":" & |
|00001330| 6d 20 69 6e 74 6f 20 6c | 69 6e 65 20 31 20 6f 66 |m into l|ine 1 of|
|00001340| 20 66 69 65 6c 64 20 32 | 0d 70 75 74 20 69 74 20 | field 2|.put it |
|00001350| 69 6e 74 6f 20 6c 69 6e | 65 20 32 20 6f 66 20 66 |into lin|e 2 of f|
|00001360| 69 65 6c 64 20 32 0d 65 | 6e 64 20 53 54 0d 0d 6f |ield 2.e|nd ST..o|
|00001370| 6e 20 68 6d 20 64 65 63 | 76 0d 67 6c 6f 62 61 6c |n hm dec|v.global|
|00001380| 20 69 74 2c 68 2c 6d 0d | 70 75 74 20 74 72 75 6e | it,h,m.|put trun|
|00001390| 63 28 69 74 29 20 69 6e | 74 6f 20 68 0d 70 75 74 |c(it) in|to h.put|
|000013a0| 20 74 72 75 6e 63 28 36 | 30 2a 28 69 74 2d 68 29 | trunc(6|0*(it-h)|
|000013b0| 29 20 69 6e 74 6f 20 6d | 0d 69 66 20 64 65 63 76 |) into m|.if decv|
|000013c0| 20 74 68 65 6e 20 70 75 | 74 20 61 62 73 28 6d 29 | then pu|t abs(m)|
|000013d0| 20 69 6e 74 6f 20 6d 0d | 69 66 20 6d 3c 31 30 20 | into m.|if m<10 |
|000013e0| 74 68 65 6e 20 70 75 74 | 20 22 30 22 20 62 65 66 |then put| "0" bef|
|000013f0| 6f 72 65 20 6d 0d 65 6e | 64 20 68 6d 0d 0d 6f 6e |ore m.en|d hm..on|
|00001400| 20 63 61 6c 63 20 6e 75 | 6d 2c 66 6f 72 63 65 0d | calc nu|m,force.|
|00001410| 73 65 74 20 63 75 72 73 | 6f 72 20 74 6f 20 31 30 |set curs|or to 10|
|00001420| 30 31 0d 2d 2d 20 63 61 | 6c 63 73 20 72 61 20 61 |01.-- ca|lcs ra a|
|00001430| 6e 64 20 64 65 63 0d 70 | 75 74 20 70 69 2f 31 38 |nd dec.p|ut pi/18|
|00001440| 30 20 69 6e 74 6f 20 66 | 61 63 0d 67 6c 6f 62 61 |0 into f|ac.globa|
|00001450| 6c 20 64 61 79 2c 64 61 | 79 53 65 63 73 2c 78 2c |l day,da|ySecs,x,|
|00001460| 78 61 2c 78 62 2c 64 61 | 79 55 54 2c 69 74 2c 68 |xa,xb,da|yUT,it,h|
|00001470| 2c 6d 2c 6d 6f 64 65 0d | 64 61 79 4f 66 59 65 61 |,m,mode.|dayOfYea|
|00001480| 72 20 2d 2d 20 67 65 74 | 73 20 64 61 79 2c 64 61 |r -- get|s day,da|
|00001490| 79 55 54 0d 67 65 74 20 | 6c 69 6e 65 20 33 20 6f |yUT.get |line 3 o|
|000014a0| 66 20 66 69 65 6c 64 20 | 31 0d 70 75 74 20 66 61 |f field |1.put fa|
|000014b0| 63 2a 28 6c 69 6e 65 20 | 31 20 6f 66 20 63 61 72 |c*(line |1 of car|
|000014c0| 64 20 66 69 65 6c 64 20 | 22 43 6f 6f 72 64 73 22 |d field |"Coords"|
|000014d0| 20 6f 66 20 63 61 72 64 | 20 31 29 20 69 6e 74 6f | of card| 1) into|
|000014e0| 20 6c 61 74 0d 69 66 20 | 28 69 74 3d 74 72 75 6e | lat.if |(it=trun|
|000014f0| 63 28 64 61 79 55 54 29 | 20 61 6e 64 20 74 68 65 |c(dayUT)| and the|
|00001500| 20 6f 70 74 69 6f 6e 6b | 65 79 20 69 73 20 75 70 | optionk|ey is up|
|00001510| 29 20 61 6e 64 20 66 6f | 72 63 65 3d 30 20 74 68 |) and fo|rce=0 th|
|00001520| 65 6e 0d 70 75 74 20 6c | 69 6e 65 20 35 20 6f 66 |en.put l|ine 5 of|
|00001530| 20 66 69 65 6c 64 20 35 | 20 69 6e 74 6f 20 64 72 | field 5| into dr|
|00001540| 61 0d 70 75 74 20 28 6c | 69 6e 65 20 36 20 6f 66 |a.put (l|ine 6 of|
|00001550| 20 66 69 65 6c 64 20 35 | 29 2a 66 61 63 20 69 6e | field 5|)*fac in|
|00001560| 74 6f 20 64 65 63 0d 70 | 75 74 20 6c 69 6e 65 20 |to dec.p|ut line |
|00001570| 33 20 6f 66 20 66 69 65 | 6c 64 20 36 20 69 6e 74 |3 of fie|ld 6 int|
|00001580| 6f 20 61 72 67 0d 65 6c | 73 65 0d 73 65 74 20 63 |o arg.el|se.set c|
|00001590| 75 72 73 6f 72 20 74 6f | 20 31 30 30 32 0d 70 75 |ursor to| 1002.pu|
|000015a0| 74 20 74 72 75 6e 63 28 | 64 61 79 55 54 29 20 69 |t trunc(|dayUT) i|
|000015b0| 6e 74 6f 20 6c 69 6e 65 | 20 33 20 6f 66 20 66 69 |nto line| 3 of fi|
|000015c0| 65 6c 64 20 31 0d 70 75 | 74 20 28 64 61 79 55 54 |eld 1.pu|t (dayUT|
|000015d0| 2b 28 28 74 68 65 20 73 | 65 63 6f 6e 64 73 2d 64 |+((the s|econds-d|
|000015e0| 61 79 53 65 63 73 29 2f | 33 36 30 30 2b 44 53 54 |aySecs)/|3600+DST|
|000015f0| 63 68 65 63 6b 28 29 29 | 2f 32 34 2d 31 29 2f 31 |check())|/24-1)/1|
|00001600| 38 33 2d 31 20 c2 0d 69 | 6e 74 6f 20 78 0d 70 75 |83-1 ..i|nto x.pu|
|00001610| 74 20 30 20 69 6e 74 6f | 20 61 0d 70 75 74 20 30 |t 0 into| a.put 0|
|00001620| 20 69 6e 74 6f 20 62 0d | 70 75 74 20 6e 75 6d 20 | into b.|put num |
|00001630| 69 6e 74 6f 20 69 0d 72 | 65 70 65 61 74 20 75 6e |into i.r|epeat un|
|00001640| 74 69 6c 20 69 3d 30 0d | 63 68 65 62 20 61 2c 62 |til i=0.|cheb a,b|
|00001650| 2c 77 6f 72 64 20 69 2b | 31 20 6f 66 20 66 69 65 |,word i+|1 of fie|
|00001660| 6c 64 20 33 0d 73 65 74 | 20 63 75 72 73 6f 72 20 |ld 3.set| cursor |
|00001670| 74 6f 20 62 75 73 79 0d | 70 75 74 20 78 61 20 69 |to busy.|put xa i|
|00001680| 6e 74 6f 20 61 0d 70 75 | 74 20 78 62 20 69 6e 74 |nto a.pu|t xb int|
|00001690| 6f 20 62 0d 73 75 62 74 | 72 61 63 74 20 31 20 66 |o b.subt|ract 1 f|
|000016a0| 72 6f 6d 20 69 0d 65 6e | 64 20 72 65 70 65 61 74 |rom i.en|d repeat|
|000016b0| 0d 70 75 74 20 78 62 20 | 69 6e 74 6f 20 62 32 0d |.put xb |into b2.|
|000016c0| 63 68 65 62 20 61 2c 62 | 2c 77 6f 72 64 20 31 20 |cheb a,b|,word 1 |
|000016d0| 6f 66 20 66 69 65 6c 64 | 20 33 0d 67 65 74 20 28 |of field| 3.get (|
|000016e0| 28 78 61 2d 62 32 29 2f | 32 2b 34 38 29 20 6d 6f |(xa-b2)/|2+48) mo|
|000016f0| 64 20 32 34 0d 70 75 74 | 20 69 74 2a 31 35 20 69 |d 24.put| it*15 i|
|00001700| 6e 74 6f 20 64 72 61 0d | 70 75 74 20 64 72 61 20 |nto dra.|put dra |
|00001710| 69 6e 74 6f 20 6c 69 6e | 65 20 35 20 6f 66 20 66 |into lin|e 5 of f|
|00001720| 69 65 6c 64 20 35 0d 68 | 6d 20 66 61 6c 73 65 0d |ield 5.h|m false.|
|00001730| 70 75 74 20 73 68 6f 72 | 74 20 6e 61 6d 65 20 6f |put shor|t name o|
|00001740| 66 20 74 68 69 73 20 63 | 61 72 64 20 26 22 20 52 |f this c|ard &" R|
|00001750| 2e 41 2e 20 3d 20 22 26 | 20 68 20 26 22 68 20 22 |.A. = "&| h &"h "|
|00001760| 20 26 20 6d 20 26 22 6d | 22 69 6e 74 6f c2 0d 6c | & m &"m|"into..l|
|00001770| 69 6e 65 20 31 20 6f 66 | 20 66 69 65 6c 64 20 35 |ine 1 of| field 5|
|00001780| 0d 70 75 74 20 30 20 69 | 6e 74 6f 20 61 0d 70 75 |.put 0 i|nto a.pu|
|00001790| 74 20 30 20 69 6e 74 6f | 20 62 0d 70 75 74 20 6e |t 0 into| b.put n|
|000017a0| 75 6d 20 69 6e 74 6f 20 | 69 0d 72 65 70 65 61 74 |um into |i.repeat|
|000017b0| 20 75 6e 74 69 6c 20 69 | 3d 30 0d 63 68 65 62 20 | until i|=0.cheb |
|000017c0| 61 2c 62 2c 77 6f 72 64 | 20 69 2b 31 20 6f 66 20 |a,b,word| i+1 of |
|000017d0| 66 69 65 6c 64 20 34 0d | 73 65 74 20 63 75 72 73 |field 4.|set curs|
|000017e0| 6f 72 20 74 6f 20 62 75 | 73 79 0d 70 75 74 20 78 |or to bu|sy.put x|
|000017f0| 61 20 69 6e 74 6f 20 61 | 0d 70 75 74 20 78 62 20 |a into a|.put xb |
|00001800| 69 6e 74 6f 20 62 0d 73 | 75 62 74 72 61 63 74 20 |into b.s|ubtract |
|00001810| 31 20 66 72 6f 6d 20 69 | 0d 65 6e 64 20 72 65 70 |1 from i|.end rep|
|00001820| 65 61 74 0d 70 75 74 20 | 78 62 20 69 6e 74 6f 20 |eat.put |xb into |
|00001830| 62 32 0d 63 68 65 62 20 | 61 2c 62 2c 77 6f 72 64 |b2.cheb |a,b,word|
|00001840| 20 31 20 6f 66 20 66 69 | 65 6c 64 20 34 0d 67 65 | 1 of fi|eld 4.ge|
|00001850| 74 20 28 78 61 2d 62 32 | 29 2f 32 0d 70 75 74 20 |t (xa-b2|)/2.put |
|00001860| 69 74 2a 66 61 63 20 69 | 6e 74 6f 20 64 65 63 0d |it*fac i|nto dec.|
|00001870| 70 75 74 20 69 74 20 69 | 6e 74 6f 20 6c 69 6e 65 |put it i|nto line|
|00001880| 20 36 20 6f 66 20 66 69 | 65 6c 64 20 35 0d 70 75 | 6 of fi|eld 5.pu|
|00001890| 74 20 65 6d 70 74 79 20 | 69 6e 74 6f 20 73 69 67 |t empty |into sig|
|000018a0| 6e 0d 69 66 20 69 74 3c | 30 20 61 6e 64 20 69 74 |n.if it<|0 and it|
|000018b0| 3e 2d 31 20 74 68 65 6e | 20 70 75 74 20 22 2d 22 |>-1 then| put "-"|
|000018c0| 20 69 6e 74 6f 20 73 69 | 67 6e 0d 69 66 20 69 74 | into si|gn.if it|
|000018d0| 3e 30 20 74 68 65 6e 20 | 70 75 74 20 22 2b 22 20 |>0 then |put "+" |
|000018e0| 69 6e 74 6f 20 73 69 67 | 6e 0d 68 6d 20 74 72 75 |into sig|n.hm tru|
|000018f0| 65 0d 70 75 74 20 73 68 | 6f 72 74 20 6e 61 6d 65 |e.put sh|ort name|
|00001900| 20 6f 66 20 74 68 69 73 | 20 63 61 72 64 26 22 20 | of this| card&" |
|00001910| 44 65 63 2e 20 20 3d 20 | 22 26 73 69 67 6e 26 68 |Dec. = |"&sign&h|
|00001920| 26 22 a1 20 22 26 6d 26 | 22 27 22 20 c2 0d 69 6e |&". "&m&|"'" ..in|
|00001930| 74 6f 20 6c 69 6e 65 20 | 32 20 6f 66 20 66 69 65 |to line |2 of fie|
|00001940| 6c 64 20 35 0d 69 66 20 | 73 68 6f 72 74 20 6e 61 |ld 5.if |short na|
|00001950| 6d 65 20 6f 66 20 74 68 | 69 73 20 63 61 72 64 20 |me of th|is card |
|00001960| 69 73 20 69 6e 20 22 53 | 75 6e 22 20 74 68 65 6e |is in "S|un" then|
|00001970| 0d 67 65 74 20 28 2d 2e | 32 30 37 39 2d 73 69 6e |.get (-.|2079-sin|
|00001980| 28 6c 61 74 29 2a 73 69 | 6e 28 64 65 63 29 29 2f |(lat)*si|n(dec))/|
|00001990| 63 6f 73 28 6c 61 74 29 | 2f 63 6f 73 28 64 65 63 |cos(lat)|/cos(dec|
|000019a0| 29 0d 70 75 74 20 61 74 | 61 6e 28 73 71 72 74 28 |).put at|an(sqrt(|
|000019b0| 31 2d 69 74 2a 69 74 29 | 2f 69 74 29 20 69 6e 74 |1-it*it)|/it) int|
|000019c0| 6f 20 61 6e 67 0d 61 64 | 64 20 70 69 20 74 6f 20 |o ang.ad|d pi to |
|000019d0| 61 6e 67 0d 69 66 20 73 | 69 6e 28 6c 61 74 29 2a |ang.if s|in(lat)*|
|000019e0| 73 69 6e 28 64 65 63 29 | 3c 30 2e 32 30 37 39 20 |sin(dec)|<0.2079 |
|000019f0| 74 68 65 6e 0d 61 64 64 | 20 70 69 20 74 6f 20 61 |then.add| pi to a|
|00001a00| 6e 67 0d 65 6e 64 20 69 | 66 0d 70 75 74 20 61 6e |ng.end i|f.put an|
|00001a10| 67 2f 66 61 63 2f 31 35 | 20 69 6e 74 6f 20 64 65 |g/fac/15| into de|
|00001a20| 6c 74 61 0d 70 75 74 20 | 64 72 61 2f 31 35 2b 28 |lta.put |dra/15+(|
|00001a30| 6c 69 6e 65 20 32 20 6f | 66 20 66 69 65 6c 64 20 |line 2 o|f field |
|00001a40| 31 29 2d 6c 69 6e 65 20 | 32 20 6f 66 20 66 69 65 |1)-line |2 of fie|
|00001a50| 6c 64 20 32 2b 32 34 2d | 44 53 54 63 68 65 63 6b |ld 2+24-|DSTcheck|
|00001a60| 28 29 20 c2 0d 69 6e 74 | 6f 20 61 72 67 0d 67 65 |() ..int|o arg.ge|
|00001a70| 74 20 28 61 72 67 2d 64 | 65 6c 74 61 29 20 6d 6f |t (arg-d|elta) mo|
|00001a80| 64 20 32 34 0d 70 75 74 | 20 69 74 20 69 6e 74 6f |d 24.put| it into|
|00001a90| 20 6c 69 6e 65 20 33 20 | 6f 66 20 63 61 72 64 20 | line 3 |of card |
|00001aa0| 66 69 65 6c 64 20 31 0d | 68 6d 20 66 61 6c 73 65 |field 1.|hm false|
|00001ab0| 0d 61 6d 70 6d 0d 70 75 | 74 20 22 54 77 69 6c 69 |.ampm.pu|t "Twili|
|00001ac0| 67 68 74 20 62 65 67 69 | 6e 73 20 61 74 20 22 26 |ght begi|ns at "&|
|00001ad0| 20 68 20 26 22 3a 22 20 | 26 20 6d 20 26 26 20 6d | h &":" |& m && m|
|00001ae0| 6f 64 65 20 69 6e 74 6f | 20 6c 69 6e 65 20 31 20 |ode into| line 1 |
|00001af0| 6f 66 c2 0d 63 64 20 66 | 6c 64 20 31 0d 67 65 74 |of..cd f|ld 1.get|
|00001b00| 20 28 61 72 67 2b 64 65 | 6c 74 61 29 20 6d 6f 64 | (arg+de|lta) mod|
|00001b10| 20 32 34 0d 70 75 74 20 | 69 74 20 69 6e 74 6f 20 | 24.put |it into |
|00001b20| 6c 69 6e 65 20 34 20 6f | 66 20 63 64 20 66 6c 64 |line 4 o|f cd fld|
|00001b30| 20 31 0d 68 6d 20 66 61 | 6c 73 65 0d 61 6d 70 6d | 1.hm fa|lse.ampm|
|00001b40| 0d 70 75 74 20 22 54 77 | 69 6c 69 67 68 74 20 65 |.put "Tw|ilight e|
|00001b50| 6e 64 73 20 20 20 20 61 | 74 20 22 26 20 68 20 26 |nds a|t "& h &|
|00001b60| 22 3a 22 20 26 20 6d 20 | 26 26 20 6d 6f 64 65 20 |":" & m |&& mode |
|00001b70| 69 6e 74 6f 20 6c 69 6e | 65 20 32 20 6f 66 20 c2 |into lin|e 2 of .|
|00001b80| 0d 63 64 20 66 6c 64 20 | 31 0d 65 6e 64 20 69 66 |.cd fld |1.end if|
|00001b90| 0d 67 65 74 20 2d 73 69 | 6e 28 6c 61 74 29 2a 73 |.get -si|n(lat)*s|
|00001ba0| 69 6e 28 64 65 63 29 2f | 63 6f 73 28 6c 61 74 29 |in(dec)/|cos(lat)|
|00001bb0| 2f 63 6f 73 28 64 65 63 | 29 0d 70 75 74 20 61 74 |/cos(dec|).put at|
|00001bc0| 61 6e 28 73 71 72 74 28 | 31 2d 69 74 2a 69 74 29 |an(sqrt(|1-it*it)|
|00001bd0| 2f 69 74 29 20 69 6e 74 | 6f 20 61 6e 67 0d 69 66 |/it) int|o ang.if|
|00001be0| 20 64 65 63 3e 30 20 74 | 68 65 6e 0d 61 64 64 20 | dec>0 t|hen.add |
|00001bf0| 70 69 20 74 6f 20 61 6e | 67 0d 65 6e 64 20 69 66 |pi to an|g.end if|
|00001c00| 0d 70 75 74 20 61 6e 67 | 2f 66 61 63 2f 31 35 20 |.put ang|/fac/15 |
|00001c10| 69 6e 74 6f 20 64 65 6c | 74 61 0d 70 75 74 20 64 |into del|ta.put d|
|00001c20| 72 61 2f 31 35 2b 6c 69 | 6e 65 20 32 20 6f 66 20 |ra/15+li|ne 2 of |
|00001c30| 66 69 65 6c 64 20 31 2d | 6c 69 6e 65 20 32 20 6f |field 1-|line 2 o|
|00001c40| 66 20 66 69 65 6c 64 20 | 32 2b 32 34 2d 44 53 54 |f field |2+24-DST|
|00001c50| 63 68 65 63 6b 28 29 69 | 6e 74 6f 20 61 72 67 0d |check()i|nto arg.|
|00001c60| 67 65 74 20 28 61 72 67 | 2d 64 65 6c 74 61 29 20 |get (arg|-delta) |
|00001c70| 6d 6f 64 20 32 34 0d 70 | 75 74 20 61 72 67 20 69 |mod 24.p|ut arg i|
|00001c80| 6e 74 6f 20 6c 69 6e 65 | 20 33 20 6f 66 20 66 69 |nto line| 3 of fi|
|00001c90| 65 6c 64 20 36 0d 70 75 | 74 20 69 74 20 69 6e 74 |eld 6.pu|t it int|
|00001ca0| 6f 20 6c 69 6e 65 20 34 | 20 6f 66 20 66 69 65 6c |o line 4| of fiel|
|00001cb0| 64 20 36 0d 68 6d 20 66 | 61 6c 73 65 0d 61 6d 70 |d 6.hm f|alse.amp|
|00001cc0| 6d 0d 70 75 74 20 73 68 | 6f 72 74 20 6e 61 6d 65 |m.put sh|ort name|
|00001cd0| 20 6f 66 20 74 68 69 73 | 20 63 61 72 64 20 26 26 | of this| card &&|
|00001ce0| 20 22 52 69 73 65 73 20 | 61 74 20 22 26 20 68 20 | "Rises |at "& h |
|00001cf0| 26 22 3a 22 20 26 20 6d | 20 26 26 20 6d 6f 64 65 |&":" & m| && mode|
|00001d00| 20 c2 0d 69 6e 74 6f 20 | 6c 69 6e 65 20 31 20 6f | ..into |line 1 o|
|00001d10| 66 20 66 69 65 6c 64 20 | 36 0d 67 65 74 20 28 61 |f field |6.get (a|
|00001d20| 72 67 2b 64 65 6c 74 61 | 29 20 6d 6f 64 20 32 34 |rg+delta|) mod 24|
|00001d30| 0d 70 75 74 20 69 74 20 | 69 6e 74 6f 20 6c 69 6e |.put it |into lin|
|00001d40| 65 20 35 20 6f 66 20 66 | 69 65 6c 64 20 36 0d 68 |e 5 of f|ield 6.h|
|00001d50| 6d 20 66 61 6c 73 65 0d | 61 6d 70 6d 0d 70 75 74 |m false.|ampm.put|
|00001d60| 20 73 68 6f 72 74 20 6e | 61 6d 65 20 6f 66 20 74 | short n|ame of t|
|00001d70| 68 69 73 20 63 61 72 64 | 20 26 26 20 22 53 65 74 |his card| && "Set|
|00001d80| 73 20 20 61 74 20 22 26 | 20 68 20 26 22 3a 22 20 |s at "&| h &":" |
|00001d90| 26 20 6d 20 26 26 20 6d | 6f 64 65 20 69 6e 74 6f |& m && m|ode into|
|00001da0| 20 c2 0d 6c 69 6e 65 20 | 32 20 6f 66 20 66 69 65 | ..line |2 of fie|
|00001db0| 6c 64 20 36 0d 65 6e 64 | 20 69 66 0d 2d 2d 20 63 |ld 6.end| if.-- c|
|00001dc0| 61 6c 63 20 61 6c 74 20 | 61 6e 64 20 61 7a 20 6f |alc alt |and az o|
|00001dd0| 66 20 6f 62 6a 65 63 74 | 0d 70 75 74 20 28 28 33 |f object|.put ((3|
|00001de0| 36 30 2b 31 35 2a 28 6c | 69 6e 65 20 32 20 6f 66 |60+15*(l|ine 2 of|
|00001df0| 20 66 69 65 6c 64 20 32 | 29 2d 64 72 61 29 20 6d | field 2|)-dra) m|
|00001e00| 6f 64 20 33 36 30 29 2a | 66 61 63 20 69 6e 74 6f |od 360)*|fac into|
|00001e10| 20 4c 48 41 0d 70 75 74 | 20 63 6f 73 28 4c 48 41 | LHA.put| cos(LHA|
|00001e20| 29 2a 73 69 6e 28 6c 61 | 74 29 2d 74 61 6e 28 64 |)*sin(la|t)-tan(d|
|00001e30| 65 63 29 2a 63 6f 73 28 | 6c 61 74 29 20 69 6e 74 |ec)*cos(|lat) int|
|00001e40| 6f 20 64 65 6e 0d 67 65 | 74 20 61 74 61 6e 28 73 |o den.ge|t atan(s|
|00001e50| 69 6e 28 4c 48 41 29 2f | 64 65 6e 29 0d 69 66 20 |in(LHA)/|den).if |
|00001e60| 64 65 6e 3e 30 20 74 68 | 65 6e 0d 67 65 74 20 70 |den>0 th|en.get p|
|00001e70| 69 2b 69 74 0d 65 6c 73 | 65 0d 69 66 20 73 69 6e |i+it.els|e.if sin|
|00001e80| 28 4c 48 41 29 3e 30 0d | 74 68 65 6e 20 67 65 74 |(LHA)>0.|then get|
|00001e90| 20 32 2a 70 69 2b 69 74 | 0d 65 6c 73 65 20 67 65 | 2*pi+it|.else ge|
|00001ea0| 74 20 69 74 0d 65 6e 64 | 20 69 66 0d 70 75 74 20 |t it.end| if.put |
|00001eb0| 72 6f 75 6e 64 28 69 74 | 2f 66 61 63 29 20 69 6e |round(it|/fac) in|
|00001ec0| 74 6f 20 74 65 6d 70 0d | 70 75 74 20 73 69 6e 28 |to temp.|put sin(|
|00001ed0| 6c 61 74 29 2a 73 69 6e | 28 64 65 63 29 2b 63 6f |lat)*sin|(dec)+co|
|00001ee0| 73 28 6c 61 74 29 2a 63 | 6f 73 28 64 65 63 29 2a |s(lat)*c|os(dec)*|
|00001ef0| 63 6f 73 28 4c 48 41 29 | 20 69 6e 74 6f 20 73 69 |cos(LHA)| into si|
|00001f00| 6e 61 0d 69 66 20 61 62 | 73 28 73 69 6e 61 29 3c |na.if ab|s(sina)<|
|00001f10| 31 20 74 68 65 6e 0d 67 | 65 74 20 72 6f 75 6e 64 |1 then.g|et round|
|00001f20| 28 61 74 61 6e 28 73 69 | 6e 61 2f 28 73 71 72 74 |(atan(si|na/(sqrt|
|00001f30| 28 31 2d 73 69 6e 61 2a | 73 69 6e 61 29 29 29 2f |(1-sina*|sina)))/|
|00001f40| 66 61 63 29 0d 69 66 20 | 69 74 3e 30 20 74 68 65 |fac).if |it>0 the|
|00001f50| 6e 0d 70 75 74 20 22 41 | 7a 2e 20 3d 20 22 26 20 |n.put "A|z. = "& |
|00001f60| 74 65 6d 70 20 69 6e 74 | 6f 20 6c 69 6e 65 20 33 |temp int|o line 3|
|00001f70| 20 6f 66 20 66 69 65 6c | 64 20 35 0d 70 75 74 20 | of fiel|d 5.put |
|00001f80| 22 41 6c 74 2e 20 3d 20 | 22 20 26 20 69 74 20 69 |"Alt. = |" & it i|
|00001f90| 6e 74 6f 20 6c 69 6e 65 | 20 34 20 6f 66 20 66 69 |nto line| 4 of fi|
|00001fa0| 65 6c 64 20 35 0d 65 6c | 73 65 0d 69 66 20 74 65 |eld 5.el|se.if te|
|00001fb0| 6d 70 3e 31 38 30 0d 74 | 68 65 6e 20 70 75 74 20 |mp>180.t|hen put |
|00001fc0| 22 57 22 20 69 6e 74 6f | 20 74 65 6d 0d 65 6c 73 |"W" into| tem.els|
|00001fd0| 65 20 70 75 74 20 22 45 | 22 20 69 6e 74 6f 20 74 |e put "E|" into t|
|00001fe0| 65 6d 0d 70 75 74 20 22 | 62 65 6c 6f 77 20 22 20 |em.put "|below " |
|00001ff0| 26 20 74 65 6d 20 26 20 | 22 20 68 6f 72 69 7a 6f |& tem & |" horizo|
|00002000| 6e 22 20 69 6e 74 6f 20 | 6c 69 6e 65 20 33 20 6f |n" into |line 3 o|
|00002010| 66 20 66 69 65 6c 64 20 | 35 0d 70 75 74 20 65 6d |f field |5.put em|
|00002020| 70 74 79 20 69 6e 74 6f | 20 6c 69 6e 65 20 34 20 |pty into| line 4 |
|00002030| 6f 66 20 66 69 65 6c 64 | 20 35 0d 65 6e 64 20 69 |of field| 5.end i|
|00002040| 66 0d 65 6c 73 65 0d 62 | 65 65 70 0d 65 6e 64 20 |f.else.b|eep.end |
|00002050| 69 66 0d 73 65 74 20 63 | 75 72 73 6f 72 20 74 6f |if.set c|ursor to|
|00002060| 20 31 0d 65 6e 64 20 63 | 61 6c 63 0d 0d 6f 6e 20 | 1.end c|alc..on |
|00002070| 61 6d 70 6d 0d 67 6c 6f | 62 61 6c 20 68 2c 6d 6f |ampm.glo|bal h,mo|
|00002080| 64 65 0d 69 66 20 68 3e | 31 31 20 74 68 65 6e 0d |de.if h>|11 then.|
|00002090| 73 75 62 74 72 61 63 74 | 20 31 32 20 66 72 6f 6d |subtract| 12 from|
|000020a0| 20 68 0d 70 75 74 20 22 | 50 4d 22 20 69 6e 74 6f | h.put "|PM" into|
|000020b0| 20 6d 6f 64 65 0d 65 6c | 73 65 0d 70 75 74 20 22 | mode.el|se.put "|
|000020c0| 41 4d 22 20 69 6e 74 6f | 20 6d 6f 64 65 0d 65 6e |AM" into| mode.en|
|000020d0| 64 20 69 66 0d 69 66 20 | 68 3d 30 20 74 68 65 6e |d if.if |h=0 then|
|000020e0| 20 70 75 74 20 31 32 20 | 69 6e 74 6f 20 68 0d 65 | put 12 |into h.e|
|000020f0| 6e 64 20 61 6d 70 6d 0d | 00 00 00 00 00 00 00 00 |nd ampm.|........|
|00002100| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002110| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002120| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002140| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000021a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000021b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000021c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000021d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000021e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000021f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002200| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002210| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002220| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002230| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002240| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002250| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002260| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002270| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002280| 00 00 02 00 4d 41 53 54 | ff ff ff ff 00 00 00 00 |....MAST|........|
|00002290| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000022a0| 00 02 b9 9c 00 02 cc e3 | 00 01 64 cd 00 01 da 96 |........|..d.....|
|000022b0| 00 02 ce 04 00 01 be 0c | 00 02 b7 d8 00 01 a8 b3 |........|........|
|000022c0| 00 02 45 1b 00 02 64 61 | 00 02 90 8a 00 03 40 0a |..E...da|......@.|
|000022d0| 00 03 55 81 00 03 6b 18 | 00 03 68 a2 00 02 60 ba |..U...k.|..h...`.|
|000022e0| 00 04 e1 10 00 03 53 38 | 00 01 bc cb 00 02 0a 9b |......S8|........|
|000022f0| 00 03 3c d7 00 03 7c a7 | 00 01 20 db 00 01 cd 13 |..<...|.|.. .....|
|00002300| 00 02 8c 2b 00 04 a5 ea | 00 01 24 b1 00 03 7e 3a |...+....|..$...~:|
|00002310| 00 00 00 00 00 00 00 00 | 00 04 6e 37 00 00 00 00 |........|..n7....|
|00002320| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002330| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002340| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002350| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002360| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002370| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002380| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002390| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000023a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000023b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000023c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000023d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000023e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000023f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002400| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002410| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002420| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002430| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002440| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002450| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002460| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002470| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002480| 00 00 00 80 4c 49 53 54 | 00 00 1e db 00 00 00 01 |....LIST|........|
|00002490| 00 00 08 00 00 00 00 0c | 00 44 00 02 00 10 00 03 |........|.D......|
|000024a0| 20 00 04 62 00 00 00 0c | 00 00 00 00 00 00 00 00 | ..b....|........|
|000024b0| 00 00 22 b1 00 0c 00 00 | 00 00 00 00 00 00 00 00 |..".....|........|
|000024c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000024d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000024e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000024f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002500| 00 00 08 00 50 41 47 45 | 00 00 22 b1 00 00 1e db |....PAGE|..".....|
|00002510| a4 af df 27 00 00 00 00 | 00 00 0b 96 e0 32 91 61 |...'....|.....2.a|
|00002520| 30 8e 81 03 4c 68 01 0a | 06 c1 03 c3 79 94 8c 00 |0...Lh..|....y...|
|00002530| 38 00 52 25 32 c8 1c 0c | 22 a9 08 80 02 0c 70 3a |8.R%2...|".....p:|
|00002540| a0 47 01 85 18 40 3f 0a | 28 03 00 10 b8 c0 91 26 |.G...@?.|(......&|
|00002550| 20 68 30 01 94 87 64 39 | e0 00 c3 c1 00 00 10 1b | h0...d9|........|
|00002560| a0 02 b1 55 b5 cc c7 e6 | 1c 66 43 9d 61 f9 e4 89 |...U....|.fC.a...|
|00002570| 56 85 b4 10 06 58 57 b9 | 10 c4 c4 9f 31 79 0b 27 |V....XW.|....1y.'|
|00002580| 08 03 70 cc 90 5f 12 06 | 36 60 df b6 b9 f4 3c 90 |..p.._..|6`....<.|
|00002590| 49 59 09 36 2c ff 0c 1b | 97 6e 4f a2 bc c5 eb e9 |IY.6,...|.nO.....|
|000025a0| 00 00 11 61 a0 7f ff 77 | bb f5 cf bd d4 e4 fb bd |...a...w|........|
|000025b0| a7 df e7 9c f5 fa ec f4 | ab ff ff 6b 32 e6 e6 3f |........|...k2..?|
|000025c0| 57 eb df 3e 75 c9 a5 f4 | e4 d7 fd b5 b3 4a fb ff |W..>u...|.....J..|
|000025d0| fb c7 fe 97 d9 6e 68 7e | bb df 71 77 d5 fc cf 7e |.....nh~|..qw...~|
|000025e0| ef a7 f7 ff 00 00 12 8a | a0 52 a3 33 38 86 bb 75 |........|.R.38..u|
|000025f0| 15 cc 03 4e 85 c4 d1 9a | 1c 06 2c 89 32 33 7e 2a |...N....|..,.23~*|
|00002600| 2b db 8d fe 4a 78 24 05 | 68 40 a4 56 81 df d7 4e |+...Jx$.|h@.V...N|
|00002610| 7e e3 bf 77 3e a2 ef 81 | ee c8 3c f7 33 d0 9f d3 |~..w>...|..<.3...|
|00002620| f5 1e ef 16 a1 2d c7 c9 | 00 00 08 9c a0 63 a1 10 |.....-..|.....c..|
|00002630| 70 84 20 a6 54 64 07 4f | 15 e2 06 90 94 11 04 b3 |p. .Td.O|........|
|00002640| 00 11 de 38 04 89 0d 2e | aa 3c 39 45 14 00 a8 46 |...8....|.<9E...F|
|00002650| 88 f5 11 06 30 40 9b 77 | 8a 52 30 84 c8 62 05 a4 |....0@.w|.R0..b..|
|00002660| 02 8a 26 93 94 e4 45 80 | ea 47 c2 c5 00 00 0c 04 |..&...E.|.G......|
|00002670| a0 22 d1 2a 74 8d 14 26 | b7 64 4f a8 01 f5 07 96 |.".*t..&|.dO.....|
|00002680| 54 05 54 03 40 23 57 30 | 23 80 00 8c 70 68 04 1c |T.T.@#W0|#...ph..|
|00002690| 6b 11 a1 86 aa 67 14 57 | f1 43 3b 27 2a 06 d2 ea |k....g.W|.C;'*...|
|000026a0| dc d4 5a 24 02 23 a0 f7 | b4 87 7f b6 a0 21 c6 e9 |..Z$.#..|.....!..|
|000026b0| 00 00 13 0a a0 10 87 34 | 7b 84 21 25 04 45 63 08 |.......4|{.!%.Ec.|
|000026c0| 15 c0 83 ba 14 08 44 0b | 06 43 fe 2a 01 d0 85 1e |......D.|.C.*....|
|000026d0| 8a 2a 08 54 70 71 a1 04 | 81 47 94 15 b0 22 3f 37 |.*.Tpq..|.G..."?7|
|000026e0| 28 c6 2e 80 e8 7e 9b 65 | 21 6a 2d 1b b4 64 cd 00 |(....~.e|!j-..d..|
|000026f0| 20 00 db c9 00 00 14 81 | a0 49 95 06 75 86 01 36 | .......|.I..u..6|
|00002700| 46 64 1b 88 c5 d7 04 91 | 34 8a 04 0e 11 11 d7 28 |Fd......|4......(|
|00002710| 01 c0 05 2f 98 29 90 10 | 00 20 a0 04 90 77 8a 44 |.../.)..|. ...w.D|
|00002720| 70 43 3f 36 3e 82 89 a0 | e8 40 3f 7c 01 14 a0 13 |pC?6>...|.@?|....|
|00002730| b4 55 ef 3f e4 0e c3 e1 | 00 00 15 18 a0 20 b1 05 |.U.?....|..... ..|
|00002740| 38 a6 a1 26 04 d0 03 48 | 0b c0 12 90 b4 20 84 26 |8..&...H|..... .&|
|00002750| 80 01 76 68 05 91 5e 4f | 48 2a 00 00 00 22 a4 24 |..vh..^O|H*...".$|
|00002760| a1 5d 20 05 b4 c2 3e 20 | 88 c4 3d 80 68 67 99 26 |.] ...> |..=.hg.&|
|00002770| 09 20 00 d3 f5 44 45 0c | a2 20 c2 c5 00 00 23 3a |. ...DE.|. ....#:|
|00002780| e0 56 a8 e9 d9 fe fc bf | df fe 6a 83 af 0d 7f c9 |.V......|..j.....|
|00002790| 2a d6 6e 78 eb 3e f7 d8 | 77 bf b5 d1 4e ff 6c b5 |*.nx.>..|w...N.l.|
|000027a0| 8d f7 94 bc f0 77 b7 ee | fd 99 fb 53 fd 6e 60 7c |.....w..|...S.n`||
|000027b0| fe dc fe 75 cd e9 5d 64 | 99 57 67 f0 fd a6 eb ea |...u..]d|.Wg.....|
|000027c0| 00 00 21 ea e0 7f bf 6d | 3f f9 3c ef ff ba d7 ab |..!....m|?.<.....|
|000027d0| 2f ef ff ef fa ff 9f 3f | ef bb b7 7f fb 9e ff 7f |/......?|........|
|000027e0| 96 fd 7d 8d 2f fd ff ff | ff ff f5 f7 f7 97 ff fb |..}./...|........|
|000027f0| df 38 fd fb fe f5 fa b5 | fe fe 75 ff f9 ff ff df |.8......|..u.....|
|00002800| af e3 fe ff 00 00 18 10 | 20 1a 3b bd 8a dd 7b e7 |........| .;...{.|
|00002810| 98 ea c6 2b 2c 03 6f aa | fa 69 1e 4b c3 18 25 36 |...+,.o.|.i.K..%6|
|00002820| 16 dc dd c9 66 48 20 ec | 29 5f 3b 7c ee cc b4 44 |....fH .|)_;|...D|
|00002830| 11 c1 e8 52 ec 29 4a c9 | 2b 05 d1 53 de 54 f5 72 |...R.)J.|+..S.T.r|
|00002840| 50 b7 4d d5 ad ab ca ba | 00 00 00 00 00 00 00 00 |P.M.....|........|
|00002850| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002860| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002870| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002880| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002890| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000028a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000028b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000028c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000028d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000028e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000028f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002900| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002910| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002920| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002930| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002940| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002950| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002960| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002970| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002980| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002990| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000029a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000029b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000029c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000029d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000029e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000029f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002a00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002a10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002a20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002a30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002a40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002a50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002a60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002a70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002a80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002a90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002aa0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002ab0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002ac0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002ad0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002ae0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002af0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002b00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002b10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002b20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002b30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002b40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002b50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002b60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002b70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002b80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002b90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002ba0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002bb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002bc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002bd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002be0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002bf0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002c00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002c10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002c20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002c30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002c40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002c50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002c60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002c70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002c80| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002c90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002ca0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002cb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002cc0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002cd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002ce0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002cf0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002d00| 00 00 08 80 42 4b 47 44 | 00 00 0a cd 00 00 0f b3 |....BKGD|........|
|00002d10| 00 00 00 00 00 00 00 09 | 00 00 1a cb 00 00 0d 0c |........|........|
|00002d20| 00 17 00 25 00 00 05 da | 00 00 00 00 00 00 00 60 |...%....|.......`|
|00002d30| 00 01 01 00 00 8c 00 2a | 00 a2 00 56 80 06 00 00 |.......*|...V....|
|00002d40| 00 00 00 01 00 00 00 0c | 00 00 00 10 44 53 54 00 |........|....DST.|
|00002d50| 00 6f 6e 20 6d 6f 75 73 | 65 55 70 0d 73 65 74 20 |.on mous|eUp.set |
|00002d60| 68 69 6c 69 74 65 20 6f | 66 20 6d 65 20 74 6f 20 |hilite o|f me to |
|00002d70| 6e 6f 74 20 68 69 6c 69 | 74 65 20 6f 66 20 6d 65 |not hili|te of me|
|00002d80| 0d 65 6e 64 20 6d 6f 75 | 73 65 55 70 0d 00 00 5c |.end mou|seUp...\|
|00002d90| 00 04 01 00 00 32 01 b0 | 00 5c 01 d7 00 00 00 00 |.....2..|.\......|
|00002da0| 4e 82 00 01 00 00 00 0c | 00 00 00 10 48 6f 6d 65 |N.......|....Home|
|00002db0| 00 00 6f 6e 20 6d 6f 75 | 73 65 55 70 0d 76 69 73 |..on mou|seUp.vis|
|00002dc0| 75 61 6c 20 65 66 66 65 | 63 74 20 64 69 73 73 6f |ual effe|ct disso|
|00002dd0| 6c 76 65 0d 67 6f 20 68 | 6f 6d 65 0d 65 6e 64 20 |lve.go h|ome.end |
|00002de0| 6d 6f 75 73 65 55 70 0d | 00 00 00 6e 00 05 01 00 |mouseUp.|...n....|
|00002df0| 00 5b 01 b0 00 81 01 d7 | 00 00 00 00 41 5c 00 01 |.[......|....A\..|
|00002e00| 00 00 00 0c 00 00 00 10 | 00 00 6f 6e 20 6d 6f 75 |........|..on mou|
|00002e10| 73 65 55 70 0d 76 69 73 | 75 61 6c 20 65 66 66 65 |seUp.vis|ual effe|
|00002e20| 63 74 20 77 69 70 65 20 | 6c 65 66 74 20 66 61 73 |ct wipe |left fas|
|00002e30| 74 0d 70 75 73 68 20 63 | 61 72 64 0d 67 6f 20 63 |t.push c|ard.go c|
|00002e40| 61 72 64 20 22 66 78 22 | 0d 65 6e 64 20 6d 6f 75 |ard "fx"|.end mou|
|00002e50| 73 65 55 70 0d 0d 00 00 | 00 24 00 06 02 00 01 1b |seUp....|.$......|
|00002e60| 00 be 01 2d 01 5e 00 00 | 00 00 00 00 00 00 00 00 |...-.^..|........|
|00002e70| 00 0c 00 00 00 10 55 54 | 00 00 00 00 00 24 00 07 |......UT|.....$..|
|00002e80| 02 00 01 1b 00 26 01 2d | 00 ba 00 00 00 00 00 00 |.....&.-|........|
|00002e90| 00 00 00 00 00 0c 00 00 | 00 10 53 54 00 00 00 00 |........|..ST....|
|00002ea0| 00 28 00 08 02 80 00 ae | 00 00 00 ef 02 00 40 01 |.(......|......@.|
|00002eb0| 00 00 00 00 00 00 00 14 | 00 0a 00 00 00 0d 52 41 |........|......RA|
|00002ec0| 20 43 68 65 62 00 00 00 | 00 2a 00 09 02 80 01 0a | Cheb...|.*......|
|00002ed0| 00 00 01 4d 01 ff 40 01 | 00 00 00 00 00 00 00 14 |...M..@.|........|
|00002ee0| 00 0a 00 00 00 0d 64 65 | 63 20 43 68 65 62 00 00 |......de|c Cheb..|
|00002ef0| 00 00 00 28 00 0a 02 00 | 00 50 00 b5 00 92 01 60 |...(....|.P.....`|
|00002f00| 00 00 00 00 00 00 00 00 | 00 00 00 0c 00 00 00 10 |........|........|
|00002f10| 4d 61 72 73 20 52 41 00 | 00 00 00 22 00 0d 02 00 |Mars RA.|..."....|
|00002f20| 00 95 00 b5 00 b7 01 6d | 00 00 00 00 00 00 00 00 |.......m|........|
|00002f30| 00 00 00 0c 00 00 00 10 | 00 00 00 00 00 22 00 0e |........|....."..|
|00002f40| 02 00 00 57 00 2c 00 70 | 00 ad 00 00 00 00 00 00 |...W.,.p|........|
|00002f50| 00 00 00 4b 00 12 00 00 | 00 18 00 00 00 00 00 52 |...K....|.......R|
|00002f60| 00 11 01 00 00 32 01 8e | 00 53 01 b1 00 00 00 00 |.....2..|.S......|
|00002f70| 00 64 00 01 00 00 00 0c | 00 00 00 10 53 75 6e 00 |.d......|....Sun.|
|00002f80| 00 6f 6e 20 6d 6f 75 73 | 65 55 70 0d 65 66 66 65 |.on mous|eUp.effe|
|00002f90| 63 74 0d 67 6f 20 63 61 | 72 64 20 22 53 75 6e 22 |ct.go ca|rd "Sun"|
|00002fa0| 0d 65 6e 64 20 6d 6f 75 | 73 65 55 70 0d 0d 00 00 |.end mou|seUp....|
|00002fb0| 00 52 00 12 01 00 00 52 | 01 8e 00 73 01 b1 00 00 |.R.....R|...s....|
|00002fc0| 00 00 00 65 00 01 00 00 | 00 0c 00 00 00 10 00 00 |...e....|........|
|00002fd0| 6f 6e 20 6d 6f 75 73 65 | 55 70 0d 65 66 66 65 63 |on mouse|Up.effec|
|00002fe0| 74 0d 67 6f 20 63 61 72 | 64 20 22 4d 65 72 63 75 |t.go car|d "Mercu|
|00002ff0| 72 79 22 0d 65 6e 64 20 | 6d 6f 75 73 65 55 70 0d |ry".end |mouseUp.|
|00003000| 0d 00 00 50 00 13 01 00 | 00 72 01 8e 00 93 01 b1 |...P....|.r......|
|00003010| 00 00 00 00 00 66 00 01 | 00 00 00 0c 00 00 00 10 |.....f..|........|
|00003020| 00 00 6f 6e 20 6d 6f 75 | 73 65 55 70 0d 65 66 66 |..on mou|seUp.eff|
|00003030| 65 63 74 0d 67 6f 20 63 | 61 72 64 20 22 56 65 6e |ect.go c|ard "Ven|
|00003040| 75 73 22 0d 65 6e 64 20 | 6d 6f 75 73 65 55 70 0d |us".end |mouseUp.|
|00003050| 0d 00 00 50 00 14 01 00 | 00 92 01 8e 00 b3 01 b1 |...P....|........|
|00003060| 00 00 00 00 00 68 00 01 | 00 00 00 0c 00 00 00 10 |.....h..|........|
|00003070| 00 00 6f 6e 20 6d 6f 75 | 73 65 55 70 0d 65 66 66 |..on mou|seUp.eff|
|00003080| 65 63 74 0d 67 6f 20 63 | 61 72 64 20 22 4d 61 72 |ect.go c|ard "Mar|
|00003090| 73 22 0d 65 6e 64 20 6d | 6f 75 73 65 55 70 0d 0d |s".end m|ouseUp..|
|000030a0| 00 00 00 52 00 15 01 00 | 00 b2 01 8e 00 d3 01 b1 |...R....|........|
|000030b0| 00 00 00 00 00 69 00 01 | 00 00 00 0c 00 00 00 10 |.....i..|........|
|000030c0| 00 00 6f 6e 20 6d 6f 75 | 73 65 55 70 0d 65 66 66 |..on mou|seUp.eff|
|000030d0| 65 63 74 0d 67 6f 20 63 | 61 72 64 20 22 4a 75 70 |ect.go c|ard "Jup|
|000030e0| 69 74 65 72 22 0d 65 6e | 64 20 6d 6f 75 73 65 55 |iter".en|d mouseU|
|000030f0| 70 0d 0d 00 00 52 00 16 | 01 00 00 d2 01 8e 00 f3 |p....R..|........|
|00003100| 01 b1 00 00 00 00 00 6a | 00 01 00 00 00 0c 00 00 |.......j|........|
|00003110| 00 10 00 00 6f 6e 20 6d | 6f 75 73 65 55 70 0d 65 |....on m|ouseUp.e|
|00003120| 66 66 65 63 74 0d 67 6f | 20 63 61 72 64 20 22 53 |ffect.go| card "S|
|00003130| 61 74 75 72 6e 22 0d 65 | 6e 64 20 6d 6f 75 73 65 |aturn".e|nd mouse|
|00003140| 55 70 0d 0d 00 00 00 52 | 00 17 01 00 00 f2 01 91 |Up.....R|........|
|00003150| 01 12 01 b1 00 00 00 00 | 00 6b 00 01 00 00 00 0c |........|.k......|
|00003160| 00 00 00 10 00 00 6f 6e | 20 6d 6f 75 73 65 55 70 |......on| mouseUp|
|00003170| 0d 65 66 66 65 63 74 0d | 67 6f 20 63 61 72 64 20 |.effect.|go card |
|00003180| 22 55 72 61 6e 75 73 22 | 0d 65 6e 64 20 6d 6f 75 |"Uranus"|.end mou|
|00003190| 73 65 55 70 0d 0d 00 00 | 00 52 00 18 01 00 01 12 |seUp....|.R......|
|000031a0| 01 8e 01 30 01 b1 00 00 | 00 00 00 6c 00 01 00 00 |...0....|...l....|
|000031b0| 00 0c 00 00 00 10 00 00 | 6f 6e 20 6d 6f 75 73 65 |........|on mouse|
|000031c0| 55 70 0d 65 66 66 65 63 | 74 0d 67 6f 20 63 61 72 |Up.effec|t.go car|
|000031d0| 64 20 22 4e 65 70 74 75 | 6e 65 22 0d 65 6e 64 20 |d "Neptu|ne".end |
|000031e0| 6d 6f 75 73 65 55 70 0d | 0d 00 00 50 00 1b 01 00 |mouseUp.|...P....|
|000031f0| 01 32 00 e7 01 54 01 13 | 00 04 00 00 15 60 00 01 |.2...T..|.....`..|
|00003200| 00 00 00 0c 00 00 00 10 | 4e 65 77 20 42 75 74 74 |........|New Butt|
|00003210| 6f 6e 00 00 6f 6e 20 6d | 6f 75 73 65 55 70 0d 67 |on..on m|ouseUp.g|
|00003220| 6f 20 66 69 72 73 74 20 | 63 61 72 64 0d 65 6e 64 |o first |card.end|
|00003230| 20 6d 6f 75 73 65 55 70 | 0d 00 00 26 00 1c 02 00 | mouseUp|...&....|
|00003240| 00 19 00 3e 00 2b 00 e4 | 00 00 00 00 00 00 00 00 |...>.+..|........|
|00003250| 00 15 00 0c 01 00 00 10 | 44 61 74 65 00 00 00 00 |........|Date....|
|00003260| 00 24 00 1f 02 00 00 19 | 01 0a 00 2c 01 d3 00 00 |.$......|...,....|
|00003270| 00 00 00 00 00 00 00 15 | 00 0c 01 00 00 10 4a 44 |........|......JD|
|00003280| 00 00 00 00 00 60 00 24 | 01 00 00 32 01 db 00 50 |.....`.$|...2...P|
|00003290| 01 fc 00 02 00 00 09 ae | 00 01 00 00 00 0c 00 00 |........|........|
|000032a0| 00 10 00 00 6f 6e 20 6d | 6f 75 73 65 55 70 0d 70 |....on m|ouseUp.p|
|000032b0| 75 73 68 20 63 61 72 64 | 0d 67 6f 20 66 69 72 73 |ush card|.go firs|
|000032c0| 74 20 63 61 72 64 20 6f | 66 20 62 6b 67 6e 64 20 |t card o|f bkgnd |
|000032d0| 22 49 6e 66 6f 22 0d 65 | 6e 64 20 6d 6f 75 73 65 |"Info".e|nd mouse|
|000032e0| 55 70 0d 00 00 24 00 25 | 02 80 00 35 01 2f 00 4f |Up...$.%|...5./.O|
|000032f0| 01 64 00 00 00 00 00 00 | 00 00 00 0e 00 12 00 00 |.d......|........|
|00003300| 00 18 52 65 6d 00 00 00 | 61 6c 6d 61 6e 61 63 00 |..Rem...|almanac.|
|00003310| 6f 6e 20 6f 70 65 6e 43 | 61 72 64 0d 67 6c 6f 62 |on openC|ard.glob|
|00003320| 61 6c 20 66 6f 72 63 65 | 0d 53 54 0d 55 54 0d 73 |al force|.ST.UT.s|
|00003330| 65 74 20 6e 75 6d 62 65 | 72 46 6f 72 6d 61 74 20 |et numbe|rFormat |
|00003340| 74 6f 20 22 30 2e 23 23 | 23 22 0d 70 75 74 20 22 |to "0.##|#".put "|
|00003350| 4a 75 6c 69 61 6e 20 44 | 61 74 65 20 3d 20 22 20 |Julian D|ate = " |
|00003360| 26 20 74 68 65 20 73 65 | 63 6f 6e 64 73 2f 38 36 |& the se|conds/86|
|00003370| 34 30 30 20 2b 20 32 34 | 31 36 34 38 30 2e 35 20 |400 + 24|16480.5 |
|00003380| 2b 20 c2 0d 44 53 54 63 | 68 65 63 6b 28 29 2f 32 |+ ..DSTc|heck()/2|
|00003390| 34 20 69 6e 74 6f 20 66 | 69 65 6c 64 20 22 4a 44 |4 into f|ield "JD|
|000033a0| 22 0d 69 66 20 74 68 65 | 20 6e 75 6d 62 65 72 20 |".if the| number |
|000033b0| 6f 66 20 74 68 69 73 20 | 63 61 72 64 20 69 73 20 |of this |card is |
|000033c0| 37 20 74 68 65 6e 0d 70 | 75 74 20 67 65 74 4a 44 |7 then.p|ut getJD|
|000033d0| 64 61 74 65 28 29 20 26 | 26 22 28 4a 54 29 22 20 |date() &|&"(JT)" |
|000033e0| 69 6e 74 6f 20 66 69 65 | 6c 64 20 22 64 61 74 65 |into fie|ld "date|
|000033f0| 22 0d 65 6c 73 65 0d 70 | 75 74 20 67 65 74 44 61 |".else.p|ut getDa|
|00003400| 74 65 28 29 20 69 6e 74 | 6f 20 66 69 65 6c 64 20 |te() int|o field |
|00003410| 22 64 61 74 65 22 0d 65 | 6e 64 20 69 66 0d 69 66 |"date".e|nd if.if|
|00003420| 20 74 68 65 20 73 68 69 | 66 74 4b 65 79 20 69 73 | the shi|ftKey is|
|00003430| 20 75 70 20 74 68 65 6e | 0d 70 75 74 20 74 68 65 | up then|.put the|
|00003440| 20 73 68 6f 72 74 20 6e | 61 6d 65 20 6f 66 20 74 | short n|ame of t|
|00003450| 68 69 73 20 63 61 72 64 | 20 69 6e 74 6f 20 66 69 |his card| into fi|
|00003460| 65 6c 64 20 37 0d 69 66 | 20 74 68 65 20 6e 75 6d |eld 7.if| the num|
|00003470| 62 65 72 20 6f 66 20 74 | 68 69 73 20 63 61 72 64 |ber of t|his card|
|00003480| 20 3e 31 20 61 6e 64 20 | 6e 75 6d 62 65 72 20 6f | >1 and |number o|
|00003490| 66 20 74 68 69 73 20 63 | 61 72 64 3c 31 30 20 74 |f this c|ard<10 t|
|000034a0| 68 65 6e 0d 63 61 6c 63 | 20 28 74 68 65 20 6e 75 |hen.calc| (the nu|
|000034b0| 6d 62 65 72 20 6f 66 20 | 77 6f 72 64 73 20 6f 66 |mber of |words of|
|000034c0| 20 66 69 65 6c 64 20 33 | 29 2c 66 6f 72 63 65 0d | field 3|),force.|
|000034d0| 65 6e 64 20 69 66 0d 65 | 6e 64 20 69 66 0d 65 6e |end if.e|nd if.en|
|000034e0| 64 20 6f 70 65 6e 43 61 | 72 64 0d 0d 6f 6e 20 65 |d openCa|rd..on e|
|000034f0| 66 66 65 63 74 0d 76 69 | 73 75 61 6c 20 77 69 70 |ffect.vi|sual wip|
|00003500| 65 20 75 70 20 76 65 72 | 79 20 66 61 73 74 0d 65 |e up ver|y fast.e|
|00003510| 6e 64 20 65 66 66 65 63 | 74 0d 0d 6f 6e 20 6f 70 |nd effec|t..on op|
|00003520| 65 6e 42 61 63 6b 67 72 | 6f 75 6e 64 0d 67 6c 6f |enBackgr|ound.glo|
|00003530| 62 61 6c 20 76 61 6c 0d | 73 65 74 20 68 69 6c 69 |bal val.|set hili|
|00003540| 74 65 20 6f 66 20 62 6b | 67 6e 64 20 62 75 74 74 |te of bk|gnd butt|
|00003550| 6f 6e 20 22 44 53 54 22 | 20 74 6f 20 76 61 6c 0d |on "DST"| to val.|
|00003560| 65 6e 64 20 6f 70 65 6e | 42 61 63 6b 67 72 6f 75 |end open|Backgrou|
|00003570| 6e 64 0d 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |nd......|........|
|00003580| 00 00 02 80 42 4d 41 50 | 00 00 0f b3 00 00 00 00 |....BMAP|........|
|00003590| 00 01 00 00 00 00 00 00 | 01 56 02 00 00 00 00 00 |........|.V......|
|000035a0| 01 56 02 00 00 00 00 00 | 01 56 02 00 00 00 00 00 |.V......|.V......|
|000035b0| 00 00 00 00 00 00 00 00 | 00 00 02 38 b6 84 8c 50 |........|...8...P|
|000035c0| ff ff ff ff f8 e3 65 01 | ff ff ff ff ff 89 50 55 |......e.|......PU|
|000035d0| 55 55 55 58 e3 65 03 55 | 55 55 55 55 50 aa aa aa |UUUX.e.U|UUUUP...|
|000035e0| aa a8 e3 65 02 aa aa aa | aa aa b5 86 8c 50 ff ff |...e....|.....P..|
|000035f0| ff ff f8 e3 65 01 ff ff | ff ff ff a3 84 50 ff ff |....e...|.....P..|
|00003600| ff ff f8 e3 65 01 ff ff | ff ff ff 89 50 55 55 55 |....e...|....PUUU|
|00003610| 55 58 e3 65 03 55 55 55 | 55 55 50 aa aa aa aa a8 |UX.e.UUU|UUP.....|
|00003620| e3 65 02 aa aa aa aa aa | a4 86 8b 26 0c 0e 18 fa |.e......|...&....|
|00003630| 33 38 00 0e 13 30 e2 05 | 26 0c 06 27 01 86 33 18 |38...0..|&..'..3.|
|00003640| 00 1b 13 30 e2 05 17 08 | 37 03 f8 30 32 20 00 3d |...0....|7..02 .=|
|00003650| 15 18 e2 03 16 1a 38 02 | 84 30 14 2b 33 68 00 18 |......8.|.0.+3h..|
|00003660| e2 03 16 1a 19 02 15 03 | 13 68 e2 05 18 77 c2 9e |........|.h...w..|
|00003670| 07 0e f0 38 1e 00 c2 4c | 38 1e 01 e0 cc 7c 73 32 |...8...L|8....|s2|
|00003680| 1e a6 e6 c1 3e 3b c1 f1 | de 78 f1 c0 e1 0a 06 c4 |....>;..|.x......|
|00003690| 35 00 39 e7 18 87 38 c4 | 31 82 f8 00 c4 31 80 80 |5.9...8.|1....1..|
|000036a0| 00 c6 37 00 d4 31 80 6e | 63 1c e3 18 e7 9c 60 80 |..7..1.n|c.....`.|
|000036b0| e1 0a 06 c4 35 00 47 5d | 1f c8 e8 fe 7f 83 be 4c |....5.G]|.......L|
|000036c0| fe 7f 80 e0 cd ff 4b 00 | d4 3e 26 96 ff a3 a7 fd |......K.|.>&.....|
|000036d0| 1d 74 c0 c0 e1 0a 8d 10 | 80 43 08 00 72 c0 12 14 |.t......|.C..r...|
|000036e0| 12 a0 c1 01 40 49 80 a0 | 01 42 80 62 0c 01 cb 14 |....@I..|.B.b....|
|000036f0| c0 18 e1 1c 01 05 8b 26 | 62 80 12 1f 02 c1 f8 01 |.......&|b.......|
|00003700| 82 7d 00 f8 01 87 63 08 | 01 8a 3f 80 10 16 2b e1 |.}....c.|..?...+.|
|00003710| 0b 16 3e 13 18 02 c1 c0 | 00 02 0c 00 c0 00 01 35 |..>.....|.......5|
|00003720| f8 3b 80 17 2b e1 0b 26 | c1 40 42 37 00 01 b8 c1 |.;..+..&|.@B7....|
|00003730| 00 81 00 01 b8 00 87 80 | 43 03 05 3f 80 17 16 e1 |........|C..?....|
|00003740| 0b 26 c1 40 02 c3 29 00 | 01 48 51 81 85 03 48 51 |.&.@..).|.HQ...HQ|
|00003750| 83 c0 01 45 00 03 05 32 | 01 00 a2 80 05 14 12 16 |...E...2|........|
|00003760| e1 0b 05 c4 01 63 39 49 | 24 ae 29 25 71 7f 81 ff |.....c9I|$.)%q...|
|00003770| 2d 71 7f a4 70 49 ff 48 | 0d 8c cf 96 90 ff a4 97 |-q..pI.H|........|
|00003780| fd 24 92 04 e1 0b 89 50 | 55 55 55 55 58 e1 1f 08 |.$.....P|UUUUX...|
|00003790| e1 65 03 55 55 55 55 55 | 50 aa aa aa aa a8 e1 1f |.e.UUUUU|P.......|
|000037a0| 10 e1 65 02 aa aa aa aa | aa 8b e2 14 d8 e1 0b e2 |..e.....|........|
|000037b0| 14 f0 e1 0b 89 50 55 55 | 55 55 58 e3 65 03 55 55 |.....PUU|UUX.e.UU|
|000037c0| 55 55 55 50 aa aa aa aa | a8 e3 65 02 aa aa aa aa |UUUP....|..e.....|
|000037d0| aa bf 86 bf 86 bf 86 bf | 86 bf 86 bf 86 bf 86 a9 |........|........|
|000037e0| 86 8c 50 7f ff ff ff f0 | e3 56 ff ff ff ff ff bf |..P.....|.V......|
|000037f0| 84 a7 84 c6 09 c6 05 53 | 09 58 08 c8 08 e5 08 c8 |.......S|.X......|
|00003800| 00 00 00 40 42 4b 47 44 | 00 00 1a cb 00 00 00 00 |...@BKGD|........|
|00003810| 00 00 00 00 00 00 00 01 | 00 00 0d 0c 00 00 0a cd |........|........|
|00003820| 00 00 00 08 00 00 00 00 | 00 00 00 00 00 00 66 78 |........|......fx|
|00003830| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003840| 00 00 01 e0 42 4b 47 44 | 00 00 0d 0c 00 00 1f 13 |....BKGD|........|
|00003850| 00 00 00 00 00 00 00 02 | 00 00 0a cd 00 00 1a cb |........|........|
|00003860| 00 05 00 05 00 00 01 76 | 00 00 00 00 00 00 00 22 |.......v|......."|
|00003870| 00 01 02 00 00 2b 00 1e | 00 47 00 f8 00 00 00 00 |.....+..|.G......|
|00003880| 00 00 00 00 00 14 00 12 | 00 00 00 18 00 00 00 00 |........|........|
|00003890| 00 22 00 02 02 00 00 52 | 00 1e 01 36 01 e6 00 07 |.".....R|...6....|
|000038a0| 00 00 00 00 00 00 00 14 | 00 0c 00 00 00 10 00 00 |........|........|
|000038b0| 00 00 00 42 00 03 01 00 | 00 27 01 c7 00 45 01 e8 |...B....|.'...E..|
|000038c0| 00 00 00 00 03 f4 00 01 | 00 00 00 0c 00 00 00 10 |........|........|
|000038d0| 00 00 6f 6e 20 6d 6f 75 | 73 65 55 70 0d 70 6f 70 |..on mou|seUp.pop|
|000038e0| 20 63 61 72 64 0d 65 6e | 64 20 6d 6f 75 73 65 55 | card.en|d mouseU|
|000038f0| 70 0d 00 00 00 78 00 04 | 01 00 00 2a 01 05 00 45 |p....x..|...*...E|
|00003900| 01 29 00 00 00 00 03 f6 | 00 01 00 00 00 0c 00 00 |.)......|........|
|00003910| 00 10 00 00 6f 6e 20 6d | 6f 75 73 65 55 70 0d 69 |....on m|ouseUp.i|
|00003920| 66 20 74 68 65 20 73 68 | 6f 72 74 20 6e 61 6d 65 |f the sh|ort name|
|00003930| 20 6f 66 20 74 68 69 73 | 20 63 61 72 64 20 69 73 | of this| card is|
|00003940| 20 22 4f 6e 65 22 0d 74 | 68 65 6e 0d 65 6c 73 65 | "One".t|hen.else|
|00003950| 20 67 6f 20 70 72 65 76 | 20 63 61 72 64 0d 65 6e | go prev| card.en|
|00003960| 64 20 6d 6f 75 73 65 55 | 70 0d 00 00 00 78 00 05 |d mouseU|p....x..|
|00003970| 01 00 00 2a 01 57 00 45 | 01 7b 00 00 00 00 03 f5 |...*.W.E|.{......|
|00003980| 00 01 00 00 00 0c 00 00 | 00 10 00 00 6f 6e 20 6d |........|....on m|
|00003990| 6f 75 73 65 55 70 0d 69 | 66 20 6e 75 6d 62 65 72 |ouseUp.i|f number|
|000039a0| 20 6f 66 20 74 68 69 73 | 20 63 61 72 64 20 3d 20 | of this| card = |
|000039b0| 6e 75 6d 62 65 72 20 6f | 66 20 63 61 72 64 73 0d |number o|f cards.|
|000039c0| 74 68 65 6e 0d 65 6c 73 | 65 20 67 6f 20 6e 65 78 |then.els|e go nex|
|000039d0| 74 20 63 61 72 64 0d 65 | 6e 64 20 6d 6f 75 73 65 |t card.e|nd mouse|
|000039e0| 55 70 0d 00 49 6e 66 6f | 00 6f 6e 20 6f 70 65 6e |Up..Info|.on open|
|000039f0| 43 61 72 64 0d 73 65 74 | 20 73 63 72 6f 6c 6c 20 |Card.set| scroll |
|00003a00| 6f 66 20 66 69 65 6c 64 | 20 32 20 74 6f 20 30 0d |of field| 2 to 0.|
|00003a10| 65 6e 64 20 6f 70 65 6e | 43 61 72 64 00 00 00 00 |end open|Card....|
|00003a20| 00 00 01 a0 42 4d 41 50 | 00 00 1f 13 00 00 00 00 |....BMAP|........|
|00003a30| 00 01 00 00 00 00 00 00 | 01 56 02 00 00 00 00 00 |........|.V......|
|00003a40| 01 56 02 00 00 00 00 00 | 01 56 02 00 00 00 00 00 |.V......|.V......|
|00003a50| 00 00 00 00 00 00 00 00 | 00 00 01 64 bf 84 a5 84 |........|...d....|
|00003a60| 8c 40 ff ff ff f8 e3 48 | 01 ff ff ff 89 40 55 55 |.@.....H|.....@UU|
|00003a70| 55 58 e3 48 01 d5 55 55 | 40 aa aa aa a0 e3 39 6a |UX.H..UU|@.....9j|
|00003a80| aa aa 40 55 55 55 40 e3 | 39 35 55 55 40 aa aa aa |..@UUU@.|95UU@...|
|00003a90| 80 e3 39 1a aa aa 40 55 | 55 55 80 e3 39 15 55 55 |..9...@U|UU..9.UU|
|00003aa0| 30 aa aa ab e3 3a 0a aa | aa 30 55 55 55 e3 3a 0d |0....:..|.0UUU.:.|
|00003ab0| 55 55 a3 86 30 55 55 55 | e2 33 c0 00 1c e1 34 0d |UU..0UUU|.3....4.|
|00003ac0| 55 55 30 aa aa ab e2 33 | c0 00 30 e1 34 0a aa aa |UU0....3|..0.4...|
|00003ad0| 30 55 55 55 e2 33 c0 00 | 60 e1 34 0d 55 55 30 aa |0UUU.3..|`.4.UU0.|
|00003ae0| aa ab e2 33 c0 00 60 e1 | 34 0a aa aa 30 55 55 55 |...3..`.|4...0UUU|
|00003af0| e2 43 c7 f1 fc 3f e1 33 | 0d 55 55 8b e2 56 07 18 |.C...?.3|.UU..V..|
|00003b00| 00 e1 c0 e1 05 8a 30 ff | ff fe e2 43 01 14 00 21 |......0.|...C...!|
|00003b10| e1 33 07 ff ff 30 ff ff | fe e2 35 01 40 a0 e1 32 |.3...0..|..5.@..2|
|00003b20| 07 ff ff 30 ff ff fe e3 | 3a 07 ff ff a2 86 30 ff |...0....|:.....0.|
|00003b30| ff fe e2 35 01 40 a0 e1 | 32 07 ff ff 30 ff ff fe |...5.@..|2...0...|
|00003b40| e2 16 21 e1 33 07 ff ff | 89 30 aa aa ab e2 43 c6 |..!.3...|.0....C.|
|00003b50| 0c 60 3f e1 33 0a aa aa | 30 55 55 55 e3 3a 0d 55 |.`?.3...|0UUU.:.U|
|00003b60| 55 30 aa aa ab e3 3a 0a | aa aa bf 86 bf 86 bf 86 |U0....:.|........|
|00003b70| bf 86 bf 86 bf 86 bf 86 | bf 86 a8 86 40 55 55 55 |........|....@UUU|
|00003b80| 80 e3 39 15 55 55 40 aa | aa aa 80 e3 39 1a aa aa |..9.UU@.|....9...|
|00003b90| 40 55 55 55 40 e3 39 35 | 55 55 40 aa aa aa a0 e3 |@UUU@.95|UU@.....|
|00003ba0| 39 6a aa aa 40 55 55 55 | 58 e3 48 01 d5 55 55 8c |9j..@UUU|X.H..UU.|
|00003bb0| 40 ff ff ff f8 e3 48 01 | ff ff ff b1 84 00 01 35 |@.....H.|.......5|
|00003bc0| 00 00 06 00 43 41 52 44 | 00 00 0b 96 00 00 1b 9b |....CARD|........|
|00003bd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 22 b1 |........|......".|
|00003be0| 00 00 0a cd 00 05 00 1b | 00 00 01 c4 00 0b 00 00 |........|........|
|00003bf0| 01 b2 00 2e 00 02 02 80 | 00 33 00 25 00 43 01 b3 |........|.3.%.C..|
|00003c00| 40 00 00 00 00 00 00 00 | 00 14 00 0a 00 00 00 0d |@.......|........|
|00003c10| 53 69 64 65 72 65 61 6c | 20 43 68 65 62 00 00 00 |Sidereal| Cheb...|
|00003c20| 00 28 00 09 02 00 00 4a | 00 81 00 8c 00 d0 40 00 |.(.....J|......@.|
|00003c30| 00 00 00 00 00 00 00 14 | 00 0c 00 00 00 10 43 6f |........|......Co|
|00003c40| 6f 72 64 73 00 00 00 00 | 00 26 00 17 02 00 00 f5 |ords....|.&......|
|00003c50| 00 28 01 17 01 09 00 00 | 00 00 00 00 00 00 00 8a |.(......|........|
|00003c60| 00 0c 00 00 00 10 41 6c | 67 6f 6c 00 00 00 00 26 |......Al|gol....&|
|00003c70| 00 18 02 00 00 a4 01 10 | 01 19 01 85 00 04 00 00 |........|........|
|00003c80| 00 00 00 00 00 14 00 0c | 00 00 00 10 45 6c 6f 6e |........|....Elon|
|00003c90| 67 00 00 00 01 22 00 1b | 01 00 01 36 00 25 01 4b |g...."..|...6.%.K|
|00003ca0| 00 af a0 03 00 00 00 00 | 00 01 00 00 00 0c 00 00 |........|........|
|00003cb0| 00 10 55 70 64 61 74 65 | 20 66 6f 72 20 54 6f 64 |..Update| for Tod|
|00003cc0| 61 79 00 00 6f 6e 20 6d | 6f 75 73 65 55 70 0d 67 |ay..on m|ouseUp.g|
|00003cd0| 6c 6f 62 61 6c 20 66 6f | 72 63 65 0d 70 75 74 20 |lobal fo|rce.put |
|00003ce0| 31 20 69 6e 74 6f 20 66 | 6f 72 63 65 0d 70 75 74 |1 into f|orce.put|
|00003cf0| 20 74 68 65 20 73 65 63 | 6f 6e 64 73 20 69 6e 74 | the sec|onds int|
|00003d00| 6f 20 74 31 0d 73 68 6f | 77 20 66 69 65 6c 64 20 |o t1.sho|w field |
|00003d10| 22 52 65 6d 22 0d 72 65 | 70 65 61 74 20 77 69 74 |"Rem".re|peat wit|
|00003d20| 68 20 69 3d 32 20 74 6f | 20 39 0d 70 75 74 20 72 |h i=2 to| 9.put r|
|00003d30| 6f 75 6e 64 28 28 74 68 | 65 20 73 65 63 6f 6e 64 |ound((th|e second|
|00003d40| 73 2d 74 31 29 2f 31 2e | 39 29 20 26 20 22 25 22 |s-t1)/1.|9) & "%"|
|00003d50| 20 69 6e 74 6f 20 66 69 | 65 6c 64 20 22 52 65 6d | into fi|eld "Rem|
|00003d60| 22 20 6f 66 20 63 61 72 | 64 20 69 0d 67 6f 20 63 |" of car|d i.go c|
|00003d70| 61 72 64 20 69 0d 65 6e | 64 20 72 65 70 65 61 74 |ard i.en|d repeat|
|00003d80| 0d 68 69 64 65 20 66 69 | 65 6c 64 20 22 52 65 6d |.hide fi|eld "Rem|
|00003d90| 22 0d 70 75 74 20 30 20 | 69 6e 74 6f 20 66 6f 72 |".put 0 |into for|
|00003da0| 63 65 0d 65 6c 6f 6e 67 | 0d 65 6e 64 20 6d 6f 75 |ce.elong|.end mou|
|00003db0| 73 65 55 70 0d 00 ff fe | 33 37 2e 33 36 36 36 34 |seUp....|37.36664|
|00003dc0| 33 34 20 31 32 2e 30 32 | 34 39 33 35 34 39 20 2e |34 12.02|493549 .|
|00003dd0| 30 30 30 30 30 34 37 38 | 20 2d 2e 30 30 30 30 30 |00000478| -.00000|
|00003de0| 30 33 35 20 2e 30 30 30 | 30 30 32 38 35 20 2e 30 |035 .000|00285 .0|
|00003df0| 30 30 30 31 35 33 39 20 | 2d 2e 30 30 30 30 30 33 |0001539 |-.000003|
|00003e00| 35 36 20 2d 2e 30 30 30 | 30 30 36 35 35 0d 0d 32 |56 -.000|00655..2|
|00003e10| 32 2e 32 30 38 33 33 33 | 00 ff f7 33 33 2e 35 0d |2.208333|...33.5.|
|00003e20| 38 34 0d 31 30 33 0d 35 | 2e 30 20 28 45 53 54 29 |84.103.5|.0 (EST)|
|00003e30| 00 00 07 53 69 64 65 72 | 65 61 6c 20 54 69 6d 65 |...Sider|eal Time|
|00003e40| 20 3d 20 32 30 3a 34 30 | 0d 32 30 2e 36 36 39 34 | = 20:40|.20.6694|
|00003e50| 34 36 00 00 06 55 6e 69 | 76 65 72 73 61 6c 20 54 |46...Uni|versal T|
|00003e60| 69 6d 65 20 3d 20 31 39 | 3a 32 38 0d 31 39 2e 34 |ime = 19|:28.19.4|
|00003e70| 37 38 36 31 31 00 00 0e | 43 61 72 64 00 00 1c 32 |78611...|Card...2|
|00003e80| 20 4a 61 6e 75 61 72 79 | 20 31 39 38 39 00 00 1f | January| 1989...|
|00003e90| 4a 75 6c 69 61 6e 20 44 | 61 74 65 20 3d 20 32 34 |Julian D|ate = 24|
|00003ea0| 34 37 35 32 39 2e 33 31 | 32 00 ff e9 4e 65 78 74 |47529.31|2...Next|
|00003eb0| 20 6d 69 6e 69 6d 75 6d | 20 6f 66 20 41 6c 67 6f | minimum| of Algo|
|00003ec0| 6c 20 6f 63 63 75 72 73 | 20 69 6e 20 34 32 2e 31 |l occurs| in 42.1|
|00003ed0| 20 68 6f 75 72 73 20 61 | 74 20 4a 44 3d 32 34 34 | hours a|t JD=244|
|00003ee0| 37 35 33 31 2e 30 36 35 | 0d 34 37 35 33 31 2e 30 |7531.065|.47531.0|
|00003ef0| 36 35 00 ff e8 4d 65 72 | 63 75 72 79 20 2d 2d 20 |65...Mer|cury -- |
|00003f00| 32 31 20 45 0d 56 65 6e | 75 73 20 2d 2d 20 32 34 |21 E.Ven|us -- 24|
|00003f10| 20 57 0d 4d 61 72 73 20 | 2d 2d 20 31 30 31 20 45 | W.Mars |-- 101 E|
|00003f20| 0d 4a 75 70 69 74 65 72 | 20 2d 2d 20 31 33 37 20 |.Jupiter| -- 137 |
|00003f30| 45 0d 53 61 74 75 72 6e | 20 2d 2d 20 37 20 57 0d |E.Saturn| -- 7 W.|
|00003f40| 55 72 61 6e 75 73 20 2d | 2d 20 31 32 20 57 0d 4e |Uranus -|- 12 W.N|
|00003f50| 65 70 74 75 6e 65 20 2d | 2d 20 33 20 57 00 00 25 |eptune -|- 3 W..%|
|00003f60| 31 00 00 0a 0d 0d 0d 00 | 43 61 72 64 00 6f 6e 20 |1.......|Card.on |
|00003f70| 65 6c 6f 6e 67 0d 67 6f | 20 66 69 72 73 74 20 63 |elong.go| first c|
|00003f80| 61 72 64 0d 70 75 74 20 | 6c 69 6e 65 20 35 20 6f |ard.put |line 5 o|
|00003f90| 66 20 66 69 65 6c 64 20 | 22 4d 61 72 73 20 52 41 |f field |"Mars RA|
|00003fa0| 22 20 6f 66 20 63 61 72 | 64 20 32 20 69 6e 74 6f |" of car|d 2 into|
|00003fb0| 20 73 72 61 0d 70 75 74 | 20 6c 69 6e 65 20 36 20 | sra.put| line 6 |
|00003fc0| 6f 66 20 66 69 65 6c 64 | 20 22 4d 61 72 73 20 52 |of field| "Mars R|
|00003fd0| 41 22 20 6f 66 20 63 61 | 72 64 20 32 20 69 6e 74 |A" of ca|rd 2 int|
|00003fe0| 6f 20 73 64 65 63 0d 72 | 65 70 65 61 74 20 77 69 |o sdec.r|epeat wi|
|00003ff0| 74 68 20 69 3d 33 20 74 | 6f 20 39 0d 73 65 74 20 |th i=3 t|o 9.set |
|00004000| 63 75 72 73 6f 72 20 74 | 6f 20 62 75 73 79 0d 70 |cursor t|o busy.p|
|00004010| 75 74 20 28 73 72 61 20 | 2d 20 20 6c 69 6e 65 20 |ut (sra |- line |
|00004020| 35 20 6f 66 20 66 69 65 | 6c 64 20 22 4d 61 72 73 |5 of fie|ld "Mars|
|00004030| 20 52 41 22 20 6f 66 20 | 63 61 72 64 20 69 29 20 | RA" of |card i) |
|00004040| 69 6e 74 6f 20 64 72 61 | 0d 70 75 74 20 28 73 64 |into dra|.put (sd|
|00004050| 65 63 20 2d 20 6c 69 6e | 65 20 36 20 6f 66 20 66 |ec - lin|e 6 of f|
|00004060| 69 65 6c 64 20 22 4d 61 | 72 73 20 52 41 22 20 6f |ield "Ma|rs RA" o|
|00004070| 66 20 63 61 72 64 20 69 | 29 20 69 6e 74 6f 20 64 |f card i|) into d|
|00004080| 64 65 63 0d 70 75 74 20 | 28 64 72 61 2b 33 36 30 |dec.put |(dra+360|
|00004090| 29 20 6d 6f 64 20 33 36 | 30 20 69 6e 74 6f 20 61 |) mod 36|0 into a|
|000040a0| 72 67 0d 69 66 20 61 72 | 67 3e 31 38 30 20 74 68 |rg.if ar|g>180 th|
|000040b0| 65 6e 0d 67 65 74 20 72 | 6f 75 6e 64 28 73 71 72 |en.get r|ound(sqr|
|000040c0| 74 28 28 33 36 30 2d 61 | 72 67 29 2a 28 33 36 30 |t((360-a|rg)*(360|
|000040d0| 2d 61 72 67 29 20 2b 20 | 64 64 65 63 2a 64 64 65 |-arg) + |ddec*dde|
|000040e0| 63 29 29 0d 70 75 74 20 | 22 45 22 20 69 6e 74 6f |c)).put |"E" into|
|000040f0| 20 64 69 72 0d 65 6c 73 | 65 0d 67 65 74 20 72 6f | dir.els|e.get ro|
|00004100| 75 6e 64 28 73 71 72 74 | 28 64 72 61 2a 64 72 61 |und(sqrt|(dra*dra|
|00004110| 20 2b 20 64 64 65 63 2a | 64 64 65 63 29 29 0d 70 | + ddec*|ddec)).p|
|00004120| 75 74 20 22 57 22 20 69 | 6e 74 6f 20 64 69 72 0d |ut "W" i|nto dir.|
|00004130| 65 6e 64 20 69 66 0d 70 | 75 74 20 28 73 68 6f 72 |end if.p|ut (shor|
|00004140| 74 20 6e 61 6d 65 20 6f | 66 20 63 61 72 64 20 69 |t name o|f card i|
|00004150| 29 20 26 20 22 20 2d 2d | 20 22 20 26 69 74 20 26 |) & " --| " &it &|
|00004160| 26 20 64 69 72 20 69 6e | 74 6f 20 c2 0d 6c 69 6e |& dir in|to ..lin|
|00004170| 65 20 69 2d 32 20 6f 66 | 20 63 61 72 64 20 66 69 |e i-2 of| card fi|
|00004180| 65 6c 64 20 22 65 6c 6f | 6e 67 22 0d 65 6e 64 20 |eld "elo|ng".end |
|00004190| 72 65 70 65 61 74 0d 73 | 65 74 20 63 75 72 73 6f |repeat.s|et curso|
|000041a0| 72 20 74 6f 20 31 0d 65 | 6e 64 20 65 6c 6f 6e 67 |r to 1.e|nd elong|
|000041b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000041c0| 00 00 07 60 42 4d 41 50 | 00 00 1b 9b 00 00 00 00 |...`BMAP|........|
|000041d0| 00 01 00 00 00 00 00 00 | 01 56 02 00 00 00 00 00 |........|.V......|
|000041e0| 01 56 02 00 00 00 00 00 | 01 56 02 00 00 00 00 00 |.V......|.V......|
|000041f0| 00 00 00 00 00 00 01 04 | 00 00 06 10 b4 82 8d e3 |........|........|
|00004200| 1a 04 05 14 08 e3 15 07 | 05 85 e3 1a 03 05 b9 85 |........|........|
|00004210| 14 08 e3 15 04 05 85 e3 | 11 10 18 04 05 85 e3 20 |........|....... |
|00004220| 10 10 0e e2 15 0a e1 0a | 85 e2 15 06 e1 0a b1 85 |........|........|
|00004230| e1 19 02 1b 08 e1 0a a5 | 85 e3 20 11 30 0e e2 2d |........|.. .0..-|
|00004240| 02 20 e1 01 e2 15 04 17 | 02 e1 02 b7 85 e3 1a 02 |. ......|........|
|00004250| 05 b2 85 15 28 38 08 00 | 10 e1 11 40 18 01 e1 04 |....(8..|...@....|
|00004260| a7 85 e3 1a 0a 05 a6 85 | 15 08 18 08 e3 01 24 01 |........|......$.|
|00004270| 20 1a 10 13 04 e1 36 01 | 00 40 e1 02 af 85 e2 12 | .....6.|.@......|
|00004280| 40 1a 40 e1 02 bf 85 a2 | 85 e2 3e 20 00 01 0f 85 |@.@.....|..> ....|
|00004290| e1 14 04 14 02 e2 06 a9 | 85 24 01 40 e3 0a bf 85 |........|.$.@....|
|000042a0| a6 85 e2 12 01 13 02 e1 | 09 a3 85 15 40 e1 1b 40 |........|....@..@|
|000042b0| e1 0e 15 40 e1 1b 80 e1 | 0e ae 85 24 04 80 e3 0a |...@....|...$....|
|000042c0| b2 85 15 40 e1 1b 80 e1 | 0e 15 80 e1 1b 40 e1 0e |...@....|.....@..|
|000042d0| a2 85 e2 12 01 13 02 e1 | 09 a3 85 24 04 40 e3 0a |........|...$.@..|
|000042e0| a5 85 e2 1b 20 15 20 0e | a5 85 15 40 e1 1c 80 e1 |.... . .|...@....|
|000042f0| 0d 85 e2 12 80 18 20 1a | 01 13 08 05 bf 82 a8 82 |...... .|........|
|00004300| b5 84 50 55 55 55 55 50 | e3 47 55 55 55 55 50 aa |..PUUUUP|.GUUUUP.|
|00004310| aa aa aa a0 e3 65 02 00 | aa aa aa aa 86 50 aa aa |.....e..|.....P..|
|00004320| aa aa a0 e3 47 aa aa aa | aa b8 86 8e 14 04 e3 26 |....G...|.......&|
|00004330| 10 40 12 10 8c 50 ff ff | ff ff f8 e3 25 01 f0 13 |.@...P..|....%...|
|00004340| 0f 89 50 55 55 55 55 58 | e3 25 03 40 13 15 50 aa |..PUUUUX|.%.@..P.|
|00004350| aa aa aa a8 e3 25 02 a0 | 13 0a a4 86 8b 26 0c 0e |.....%..|.....&..|
|00004360| 18 fa 33 38 00 0e 13 30 | e2 05 26 0c 06 27 01 86 |..38...0|..&..'..|
|00004370| 33 18 00 1b 13 30 1c 40 | 42 10 00 fc 80 e1 02 17 |3....0.@|B.......|
|00004380| 08 37 03 f8 30 32 20 00 | 3d 15 18 1a 80 42 30 00 |.7..02 .|=....B0.|
|00004390| f8 40 e1 02 16 1a 38 02 | 84 30 14 2b 33 68 00 18 |.@....8.|.0.+3h..|
|000043a0| 1a c0 42 60 01 7c c0 e1 | 02 16 1a 19 02 15 03 13 |..B`.|..|........|
|000043b0| 68 2b 01 80 42 80 01 18 | 60 e1 02 18 77 c2 9e 07 |h+..B...|`...w...|
|000043c0| 0e f0 38 1e 00 c2 4c 38 | 1e 01 e0 cc 7c 73 32 1e |..8...L8|....|s2.|
|000043d0| a6 e6 c2 3e 3b c1 f1 de | 78 f1 c0 01 9e 70 00 40 |...>;...|x....p.@|
|000043e0| 02 70 60 e1 02 06 c5 35 | 00 39 e7 18 87 38 c4 31 |.p`....5|.9...8.1|
|000043f0| 82 f8 00 c4 31 80 80 00 | c6 37 00 d4 31 80 6e 63 |....1...|.7..1.nc|
|00004400| 1c e3 18 e7 9c 60 80 02 | 0c 20 00 80 01 f8 10 e1 |.....`..|. ......|
|00004410| 02 36 35 00 47 c4 5d 1f | c8 e8 fe 7f 83 be 4c fe |.65.G.].|......L.|
|00004420| 7f 80 e0 cd ff 4b 00 d4 | 3e 26 96 ff a3 a7 fd 1d |.....K..|>&......|
|00004430| 74 c0 c0 02 18 30 32 03 | f8 10 e1 02 8d 10 80 43 |t....02.|.......C|
|00004440| 08 00 72 c0 12 14 12 a0 | c1 01 40 49 80 a0 01 42 |..r.....|..@I...B|
|00004450| 80 62 0c 01 cb 14 c0 18 | e1 2c 01 10 13 10 8b 26 |.b......|.,.....&|
|00004460| 62 80 12 1f 02 c1 f8 01 | 82 7d 00 f8 01 87 63 08 |b.......|.}....c.|
|00004470| 01 8a 3f 80 10 16 2b 22 | 05 c0 e1 07 8a 50 ff ff |..?...+"|.....P..|
|00004480| ff ff f0 15 1f 12 f8 34 | f8 00 05 26 1c 80 1e 03 |.......4|...&....|
|00004490| 2e 01 e0 13 1f 8b 26 c1 | 40 42 37 00 01 b8 c1 00 |......&.|@B7.....|
|000044a0| 81 00 01 b8 00 87 80 43 | 03 05 3f 80 17 16 22 02 |.......C|..?...".|
|000044b0| 83 22 33 98 e1 03 26 c1 | 40 02 c3 29 00 01 48 51 |."3...&.|@..)..HQ|
|000044c0| 81 85 03 48 51 83 c0 01 | 45 00 03 05 32 01 00 a2 |...HQ...|E...2...|
|000044d0| 80 05 14 22 16 00 c1 02 | 02 83 00 cc 32 e8 10 e1 |..."....|....2...|
|000044e0| 02 15 01 c5 63 39 49 24 | ae 29 25 71 7f 81 ff 2d |....c9I$|.)%q...-|
|000044f0| 71 7f a4 70 49 ff 48 0d | 8c cf 96 90 ff a4 97 fd |q..pI.H.|........|
|00004500| 24 92 04 00 02 01 03 00 | 30 33 90 10 e1 02 89 50 |$.......|03.....P|
|00004510| 55 55 55 55 58 e1 1f 08 | 12 80 15 40 2c 03 40 13 |UUUUX...|...@,.@.|
|00004520| 15 8a 50 ff ff ff ff f0 | e1 1f 18 e1 25 01 e0 13 |..P.....|....%...|
|00004530| 1f 8b e2 14 d8 12 c0 15 | c0 e1 02 89 50 aa aa aa |........|....P...|
|00004540| aa a8 e1 1f e0 e1 25 02 | a0 13 0a 50 55 55 55 55 |......%.|...PUUUU|
|00004550| 58 e3 25 03 40 13 15 50 | aa aa aa aa a8 e3 25 02 |X.%.@..P|......%.|
|00004560| a0 13 0a a2 86 8b 75 01 | 00 02 08 40 00 40 e3 04 |......u.|...@.@..|
|00004570| 8a 50 ff ff ff ff f0 13 | 08 e3 61 01 ea aa aa aa |.P......|..a.....|
|00004580| bf 8b 66 01 c5 10 a2 23 | 87 e2 5f 15 55 55 55 40 |..f....#|.._.UUU@|
|00004590| 76 02 20 08 02 24 08 80 | e3 03 67 25 10 a0 07 8f |v. ..$..|..g%....|
|000045a0| 80 e3 03 1b 07 e3 04 26 | 03 c0 14 80 e3 03 2a 40 |.......&|......*@|
|000045b0| 07 e3 04 66 f3 c3 80 73 | 87 8f e3 04 89 50 aa aa |...f...s|.....P..|
|000045c0| aa aa a8 e3 65 02 aa aa | aa aa aa 50 55 55 55 55 |....e...|...PUUUU|
|000045d0| 58 e3 65 03 55 55 55 55 | 55 a5 86 8b 15 01 43 08 |X.e.UUUU|U.....C.|
|000045e0| 40 00 40 e3 03 15 01 34 | 40 00 40 e3 03 76 01 c5 |@.@....4|@.@..v..|
|000045f0| 87 90 a2 23 87 e3 03 06 | c1 02 26 48 88 02 24 08 |...#....|..&H..$.|
|00004600| 80 e3 02 06 c1 03 e1 cf | 10 a0 07 8f 80 e3 02 17 |........|........|
|00004610| 02 14 07 e3 03 1d 80 e3 | 02 2b 40 07 e3 03 76 f3 |........|.+@...v.|
|00004620| e0 0f 00 73 87 8f e3 03 | 15 01 c1 02 24 48 08 42 |...s....|....$H.B|
|00004630| 64 48 80 e3 02 05 c1 01 | f1 c4 4f 08 31 a3 c7 e3 |dH......|..O.1...|
|00004640| 03 28 07 80 e3 06 89 50 | 55 55 55 55 58 e3 65 03 |.(.....P|UUUUX.e.|
|00004650| 55 55 55 55 55 50 aa aa | aa aa a8 e3 65 02 aa aa |UUUUUP..|....e...|
|00004660| aa aa aa a2 86 8b 66 20 | c2 08 40 00 40 e3 04 66 |......f |..@.@..f|
|00004670| 20 42 00 40 00 40 e3 04 | 66 70 85 10 a2 23 87 e3 | B.@.@..|fp...#..|
|00004680| 04 76 70 00 08 02 24 08 | 80 e3 03 76 d8 05 10 a0 |.vp...$.|...v....|
|00004690| 07 8f 80 e3 03 16 d8 14 | 07 e3 04 25 01 74 15 80 |........|...%.t..|
|000046a0| e3 03 25 01 8c 23 40 07 | e3 04 66 f8 03 80 73 87 |..%..#@.|..f...s.|
|000046b0| 8f e3 04 89 50 aa aa aa | aa a8 e3 65 02 aa aa aa |....P...|...e....|
|000046c0| aa aa 50 55 55 55 55 58 | e3 65 03 55 55 55 55 55 |..PUUUUX|.e.UUUUU|
|000046d0| a5 86 8b 45 02 17 f0 1e | 14 08 e3 02 45 02 10 80 |...E....|....E...|
|000046e0| 21 14 08 e1 24 1f c7 13 | 03 e1 08 06 c1 07 70 3e |!...$...|......p>|
|000046f0| 1c 5d 73 87 14 e1 24 0c | 63 13 03 e1 08 68 01 22 |.]s...$.|c....h."|
|00004700| 61 84 48 80 e1 24 13 f4 | c1 1f 1f c1 c4 c7 c7 f7 |a.H..$..|........|
|00004710| bc e1 04 59 3e 1c 77 cf | 14 e1 15 50 c1 31 8e 63 |...Y>.w.|...P.1.c|
|00004720| 60 0c 63 83 18 e1 04 4a | 20 83 80 80 e1 15 50 c1 |`.c....J| .....P.|
|00004730| 18 93 a7 f4 c6 24 f4 a4 | e1 04 1c 40 e1 25 03 f0 |.....$..|...@.%..|
|00004740| c1 2c 02 04 90 0b 00 82 | a8 e1 04 18 01 32 03 80 |.,......|.....2..|
|00004750| 80 e1 25 60 36 52 30 6d | 80 02 a8 e1 04 25 03 f0 |..%`6R0m|.....%..|
|00004760| c1 00 3e 3e 00 07 8f 0e | 40 e1 23 03 c0 c1 2e 00 |..>>....|@.#.....|
|00004770| 04 90 6b 80 01 50 e1 04 | 15 02 c1 10 80 21 22 41 |..k..P..|.....!"A|
|00004780| 04 48 88 e1 24 12 04 c1 | ae 52 97 c2 ab 94 81 d0 |.H..$...|.R......|
|00004790| e1 04 89 50 55 55 55 55 | 58 e2 16 c0 6e 03 55 55 |...PUUUU|X...n.UU|
|000047a0| 55 55 55 8b e2 22 1e 07 | c1 9f de f1 c1 c7 f7 81 |UUU.."..|........|
|000047b0| e0 e1 04 e2 2a 03 c0 e1 | 04 89 50 aa aa aa aa a8 |....*...|..P.....|
|000047c0| e3 65 02 aa aa aa aa aa | 50 55 55 55 55 58 e3 65 |.e......|PUUUUX.e|
|000047d0| 03 55 55 55 55 55 a2 86 | 8b e2 22 1f ee 24 06 0c |.UUUUU..|.."..$..|
|000047e0| e1 06 e2 22 0c 66 14 06 | e1 07 e2 32 13 e8 1c c1 |...".f..|...2....|
|000047f0| 7f 0f cf 89 90 38 fe 1e | e1 03 e2 32 01 e0 36 c1 |.....8..|...2..6.|
|00004800| 39 99 98 c0 0c 6c 73 33 | e1 03 e2 32 03 80 7f c1 |9....ls3|...2....|
|00004810| 4e 96 4c 49 90 fe 9d 2e | e1 03 e2 44 55 08 00 16 |N.LI....|...DU...|
|00004820| 32 aa 10 2d e1 03 e2 22 | 03 80 42 16 9b 00 c0 12 |2..-..."|..B.....|
|00004830| 33 e1 03 e2 32 01 e0 55 | c1 00 01 97 00 c0 aa 00 |3...2..U|........|
|00004840| 2d e1 03 e2 32 13 e9 7f | c1 4a 40 97 25 52 fe 94 |-...2...|.J@.%R..|
|00004850| 9d e1 03 e2 32 0c 66 36 | c1 31 80 d9 c6 cc 6c 63 |....2.f6|.1....lc|
|00004860| 33 e1 03 8a 50 ff ff ff | ff f0 e3 65 01 ff ff ff |3...P...|...e....|
|00004870| ff ff 8b e2 26 17 40 e1 | 08 89 50 aa aa aa aa a8 |....&.@.|..P.....|
|00004880| e3 65 02 aa aa aa aa aa | 50 55 55 55 55 58 e3 65 |.e......|PUUUUX.e|
|00004890| 03 55 55 55 55 55 bf 86 | bf 86 b9 86 8c 60 7f ff |.UUUUU..|.....`..|
|000048a0| ff ff f4 80 e1 1b 40 e1 | 68 02 ff ff ff ff ff 8b |......@.|h.......|
|000048b0| 15 80 e1 1b 80 e1 0e 8a | 50 ff ff ff ff f0 e3 65 |........|P......e|
|000048c0| 01 ff ff ff ff ff bf 86 | 86 8c 60 ff ff ff ff fc |........|..`.....|
|000048d0| 80 e1 1b 40 e1 68 03 ff | ff ff ff ff 89 50 55 55 |...@.h..|.....PUU|
|000048e0| 55 55 58 e3 65 03 55 55 | 55 55 55 50 aa aa aa aa |UUX.e.UU|UUUP....|
|000048f0| a8 e3 65 02 aa aa aa aa | aa b4 86 8c 50 7f ff ff |..e.....|....P...|
|00004900| ff f0 e3 56 ff ff ff ff | ff bf 84 a7 84 69 67 68 |...V....|.....igh|
|00004910| 74 05 77 69 64 74 68 06 | 68 65 69 67 68 74 07 74 |t.width.|height.t|
|00004920| 00 00 03 60 43 41 52 44 | 00 00 10 1b 00 00 17 ba |...`CARD|........|
|00004930| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 22 b1 |........|......".|
|00004940| 00 00 0a cd 00 01 00 13 | 00 00 00 2a 00 0b 00 00 |........|...*....|
|00004950| 02 e6 00 2a 00 12 02 00 | 00 bc 00 b5 00 df 01 77 |...*....|.......w|
|00004960| 00 00 00 00 00 00 00 00 | 00 00 00 0c 00 00 00 10 |........|........|
|00004970| 54 77 69 6c 69 67 68 74 | 00 00 00 00 00 07 53 69 |Twilight|......Si|
|00004980| 64 65 72 65 61 6c 20 54 | 69 6d 65 20 3d 20 32 30 |dereal T|ime = 20|
|00004990| 3a 34 30 0d 32 30 2e 36 | 37 31 31 31 37 00 00 08 |:40.20.6|71117...|
|000049a0| 36 31 2e 34 39 31 32 34 | 30 37 20 31 31 2e 38 38 |61.49124|07 11.88|
|000049b0| 38 39 33 33 35 20 2e 30 | 33 31 34 34 32 36 20 2e |89335 .0|314426 .|
|000049c0| 30 37 32 38 38 34 36 20 | 2e 30 34 32 35 34 37 32 |0728846 |.0425472|
|000049d0| 20 2e 31 30 33 36 31 35 | 33 20 2d 2e 30 33 33 30 | .103615|3 -.0330|
|000049e0| 37 31 20 2d 2e 30 34 33 | 37 31 33 36 20 2e 30 30 |71 -.043|7136 .00|
|000049f0| 37 36 38 39 31 20 2e 30 | 30 37 33 39 35 34 20 2d |76891 .0|073954 -|
|00004a00| 2e 30 30 32 31 34 20 2d | 2e 30 30 31 36 34 39 37 |.00214 -|.0016497|
|00004a10| 20 2e 30 30 31 30 36 39 | 34 20 2e 30 30 30 36 37 | .001069|4 .00067|
|00004a20| 32 37 20 2d 2e 30 30 30 | 33 37 35 34 20 2d 2e 30 |27 -.000|3754 -.0|
|00004a30| 30 30 31 39 31 39 20 2e | 30 30 30 31 32 30 39 20 |001919 .|0001209 |
|00004a40| 2e 30 30 30 30 31 31 36 | 20 2d 2e 30 30 30 30 34 |.0000116| -.00004|
|00004a50| 32 38 20 2d 2e 30 30 30 | 30 34 33 31 20 2e 30 30 |28 -.000|0431 .00|
|00004a60| 30 30 31 30 38 20 2e 30 | 30 30 30 30 32 36 00 00 |00108 .0|000026..|
|00004a70| 09 2d 31 33 2e 34 34 38 | 34 33 20 2d 32 2e 35 36 |.-13.448|43 -2.56|
|00004a80| 30 38 30 37 20 2d 32 32 | 2e 34 35 32 35 39 38 20 |0807 -22|.452598 |
|00004a90| 32 2e 39 35 30 39 38 35 | 20 36 2e 36 33 39 36 33 |2.950985| 6.63963|
|00004aa0| 31 20 2d 2e 33 39 35 38 | 20 2d 2e 34 39 37 35 39 |1 -.3958| -.49759|
|00004ab0| 32 20 2e 30 36 38 34 30 | 33 20 2e 30 37 31 30 30 |2 .06840|3 .07100|
|00004ac0| 39 20 2d 2e 30 34 31 31 | 39 38 20 2d 2e 30 33 35 |9 -.0411|98 -.035|
|00004ad0| 32 32 35 20 2e 30 31 32 | 39 32 37 20 2e 30 30 38 |225 .012|927 .008|
|00004ae0| 35 33 35 20 2d 2e 30 30 | 33 32 30 35 20 2d 2e 30 |535 -.00|3205 -.0|
|00004af0| 30 31 36 32 37 20 2e 30 | 30 31 31 32 37 20 2e 30 |01627 .0|01127 .0|
|00004b00| 30 30 35 31 35 20 2d 2e | 30 30 30 34 37 37 20 2d |00515 -.|000477 -|
|00004b10| 2e 30 30 30 30 35 32 20 | 2e 30 30 30 30 38 36 20 |.000052 |.000086 |
|00004b20| 2e 30 30 30 30 36 20 2d | 2e 30 30 30 30 33 32 0d |.00006 -|.000032.|
|00004b30| 00 00 0a 53 75 6e 20 52 | 2e 41 2e 20 3d 20 31 38 |...Sun R|.A. = 18|
|00004b40| 68 20 35 34 6d 0d 53 75 | 6e 20 44 65 63 2e 20 20 |h 54m.Su|n Dec. |
|00004b50| 3d 20 2d 32 32 a1 20 35 | 30 27 0d 41 7a 2e 20 3d |= -22. 5|0'.Az. =|
|00004b60| 20 32 30 38 0d 41 6c 74 | 2e 20 3d 20 32 38 0d 32 | 208.Alt|. = 28.2|
|00004b70| 38 33 2e 37 30 31 0d 2d | 32 32 2e 38 34 35 00 00 |83.701.-|22.845..|
|00004b80| 06 55 6e 69 76 65 72 73 | 61 6c 20 54 69 6d 65 20 |.Univers|al Time |
|00004b90| 3d 20 31 39 3a 32 38 0d | 31 39 2e 34 38 30 35 35 |= 19:28.|19.48055|
|00004ba0| 36 0d 32 00 00 0d 53 75 | 6e 20 52 69 73 65 73 20 |6.2...Su|n Rises |
|00004bb0| 61 74 20 37 3a 34 38 20 | 41 4d 0d 53 75 6e 20 53 |at 7:48 |AM.Sun S|
|00004bc0| 65 74 73 20 20 61 74 20 | 35 3a 33 38 20 50 4d 0d |ets at |5:38 PM.|
|00004bd0| 33 36 2e 37 32 33 0d 37 | 2e 38 30 32 0d 31 37 2e |36.723.7|.802.17.|
|00004be0| 36 34 33 00 00 0e 53 75 | 6e 00 00 1f 4a 75 6c 69 |643...Su|n...Juli|
|00004bf0| 61 6e 20 44 61 74 65 20 | 3d 20 32 34 34 37 35 32 |an Date |= 244752|
|00004c00| 39 2e 33 31 32 00 ff ee | 54 77 69 6c 69 67 68 74 |9.312...|Twilight|
|00004c10| 20 62 65 67 69 6e 73 20 | 61 74 20 36 3a 34 35 20 | begins |at 6:45 |
|00004c20| 41 4d 0d 54 77 69 6c 69 | 67 68 74 20 65 6e 64 73 |AM.Twili|ght ends|
|00004c30| 20 20 20 20 61 74 20 36 | 3a 34 31 20 50 4d 0d 36 | at 6|:41 PM.6|
|00004c40| 2e 37 35 35 0d 31 38 2e | 36 39 31 00 00 25 30 25 |.755.18.|691..%0%|
|00004c50| 00 00 1c 32 20 4a 61 6e | 75 61 72 79 20 31 39 38 |...2 Jan|uary 198|
|00004c60| 39 00 53 75 6e 00 00 00 | 00 00 00 00 00 00 00 00 |9.Sun...|........|
|00004c70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00004c80| 00 00 00 80 42 4d 41 50 | 00 00 17 ba 00 00 00 00 |....BMAP|........|
|00004c90| 00 01 00 00 00 00 00 00 | 01 56 02 00 00 33 01 27 |........|.V...3.'|
|00004ca0| 01 54 01 b2 01 33 01 27 | 01 54 01 4e 00 00 00 00 |.T...3.'|.T.N....|
|00004cb0| 00 00 00 00 00 00 00 2c | 00 00 00 14 8d 1d 04 24 |.......,|.......$|
|00004cc0| 20 00 bd 85 bf 81 bf 81 | bf 81 bf 81 bf 81 bf 81 | .......|........|
|00004cd0| bf 81 a9 81 20 01 02 e1 | 02 bd 85 11 12 e1 02 85 |.... ...|........|
|00004ce0| 11 10 13 01 0e 00 00 00 | 20 01 54 06 11 a8 06 be |........| .T.....|
|00004cf0| 86 80 01 55 55 55 55 54 | 00 00 00 00 00 00 00 00 |...UUUUT|........|
|00004d00| 00 00 05 00 43 41 52 44 | 00 00 11 61 00 00 20 2b |....CARD|...a.. +|
|00004d10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 22 b1 |........|......".|
|00004d20| 00 00 0a cd 00 00 00 0f | 00 00 00 00 00 0a 00 00 |........|........|
|00004d30| 04 ad 00 07 53 69 64 65 | 72 65 61 6c 20 54 69 6d |....Side|real Tim|
|00004d40| 65 20 3d 20 31 38 3a 35 | 37 0d 31 38 2e 39 35 33 |e = 18:5|7.18.953|
|00004d50| 00 00 08 36 32 2e 30 38 | 39 34 33 36 31 20 31 32 |...62.08|94361 12|
|00004d60| 2e 32 35 30 34 37 30 32 | 20 2e 36 30 37 30 33 34 |.2504702| .607034|
|00004d70| 37 20 2d 2e 31 38 36 31 | 39 30 38 20 2e 37 32 30 |7 -.1861|908 .720|
|00004d80| 32 36 34 36 20 2d 2e 31 | 33 38 32 37 33 33 20 2e |2646 -.1|382733 .|
|00004d90| 31 33 31 34 36 36 38 20 | 2d 2e 32 39 37 39 34 36 |1314668 |-.297946|
|00004da0| 37 20 2d 2e 38 31 39 34 | 31 33 33 20 2e 34 37 38 |7 -.8194|133 .478|
|00004db0| 35 32 30 32 20 2e 33 35 | 34 34 37 33 20 2d 2e 31 |5202 .35|4473 -.1|
|00004dc0| 35 32 32 34 30 37 20 2d | 2e 32 37 30 39 30 32 34 |522407 -|.2709024|
|00004dd0| 20 2e 30 31 36 31 38 38 | 35 20 2e 31 30 35 38 31 | .016188|5 .10581|
|00004de0| 37 37 20 2d 2e 30 39 36 | 30 35 33 34 20 2e 31 30 |77 -.096|0534 .10|
|00004df0| 32 39 32 36 39 20 2e 30 | 35 35 32 33 35 33 20 2d |29269 .0|552353 -|
|00004e00| 2e 30 38 30 35 36 36 31 | 20 2d 2e 30 35 33 39 34 |.0805661| -.05394|
|00004e10| 34 33 20 2e 30 30 34 38 | 38 36 38 20 2e 30 35 33 |43 .0048|868 .053|
|00004e20| 35 33 39 33 20 2e 30 31 | 34 36 30 38 33 20 2e 30 |5393 .01|46083 .0|
|00004e30| 30 34 36 34 34 37 20 2d | 2e 30 32 38 37 38 35 36 |046447 -|.0287856|
|00004e40| 20 2d 2e 30 32 39 37 35 | 20 2e 30 31 38 34 31 31 | -.02975| .018411|
|00004e50| 36 20 2e 30 32 30 31 36 | 36 39 20 2e 30 30 36 35 |6 .02016|69 .0065|
|00004e60| 39 37 37 20 2d 2e 30 31 | 30 37 39 31 37 20 2d 2e |977 -.01|07917 -.|
|00004e70| 30 30 37 35 35 39 37 20 | 2d 2e 30 30 31 36 39 37 |0075597 |-.001697|
|00004e80| 36 20 2d 2e 30 30 31 39 | 37 30 39 20 2e 30 30 37 |6 -.0019|709 .007|
|00004e90| 39 33 38 39 20 2e 30 30 | 36 39 36 33 39 20 2d 2e |9389 .00|69639 -.|
|00004ea0| 30 30 32 31 37 33 35 20 | 2d 2e 30 30 39 32 35 32 |0021735 |-.009252|
|00004eb0| 33 20 2d 2e 30 30 32 37 | 37 36 38 20 2e 30 30 36 |3 -.0027|768 .006|
|00004ec0| 31 37 35 32 20 2e 30 30 | 33 30 34 38 36 20 2d 2e |1752 .00|30486 -.|
|00004ed0| 30 30 30 33 37 36 20 2d | 2e 30 30 31 37 31 32 39 |000376 -|.0017129|
|00004ee0| 20 2d 2e 30 30 31 39 31 | 32 37 20 2d 2e 30 30 30 | -.00191|27 -.000|
|00004ef0| 36 33 38 36 20 2e 30 30 | 31 33 32 39 38 20 2e 30 |6386 .00|13298 .0|
|00004f00| 30 31 38 38 35 35 20 2d | 2e 30 30 30 31 37 38 34 |018855 -|.0001784|
|00004f10| 20 2d 2e 30 30 30 39 32 | 33 33 20 2d 2e 30 30 30 | -.00092|33 -.000|
|00004f20| 38 32 33 37 20 2d 2e 30 | 30 30 33 39 35 34 00 00 |8237 -.0|003954..|
|00004f30| 09 2d 31 35 2e 33 36 38 | 36 39 31 20 2d 32 2e 34 |.-15.368|691 -2.4|
|00004f40| 39 31 37 37 35 20 2d 32 | 30 2e 32 39 32 35 38 38 |91775 -2|0.292588|
|00004f50| 20 32 2e 36 38 30 31 31 | 20 37 2e 34 39 39 33 34 | 2.68011| 7.49934|
|00004f60| 20 2d 32 2e 33 37 33 34 | 34 39 20 2e 32 37 38 35 | -2.3734|49 .2785|
|00004f70| 32 20 34 2e 34 37 31 36 | 31 37 20 2d 2e 39 36 31 |2 4.4716|17 -.961|
|00004f80| 35 31 32 20 2e 35 35 36 | 34 31 38 20 2d 31 2e 33 |512 .556|418 -1.3|
|00004f90| 32 34 35 31 33 20 2d 33 | 2e 31 31 34 39 39 20 31 |24513 -3|.11499 1|
|00004fa0| 2e 33 33 32 34 36 37 20 | 32 2e 36 33 32 30 30 38 |.332467 |2.632008|
|00004fb0| 20 2d 2e 31 36 31 38 32 | 38 20 2d 31 2e 37 31 35 | -.16182|8 -1.715|
|00004fc0| 38 34 36 20 2d 2e 30 39 | 37 31 35 39 20 2e 33 32 |846 -.09|7159 .32|
|00004fd0| 30 31 31 39 20 2d 2e 30 | 37 32 31 38 32 20 2e 33 |0119 -.0|72182 .3|
|00004fe0| 38 33 39 38 37 20 2e 32 | 38 32 34 38 38 20 2d 2e |83987 .2|82488 -.|
|00004ff0| 32 32 31 32 39 38 20 2d | 2e 34 34 30 37 34 20 2d |221298 -|.44074 -|
|00005000| 2e 30 37 30 32 35 20 2e | 32 37 36 38 30 33 20 2e |.07025 .|276803 .|
|00005010| 32 33 36 33 39 31 20 2d | 2e 30 31 30 38 34 38 20 |236391 -|.010848 |
|00005020| 2d 2e 32 30 32 37 39 33 | 20 2d 2e 31 30 34 39 38 |-.202793| -.10498|
|00005030| 33 20 2e 30 32 33 38 39 | 32 20 2e 31 30 30 34 36 |3 .02389|2 .10046|
|00005040| 39 20 2e 30 39 30 31 35 | 33 20 2d 2e 30 32 39 31 |9 .09015|3 -.0291|
|00005050| 30 31 20 2d 2e 30 38 30 | 34 39 33 20 2d 2e 30 33 |01 -.080|493 -.03|
|00005060| 34 31 31 37 20 2e 30 31 | 38 30 38 31 20 2e 30 33 |4117 .01|8081 .03|
|00005070| 30 33 31 33 20 2e 30 34 | 30 31 34 39 20 2e 30 30 |0313 .04|0149 .00|
|00005080| 36 37 33 36 20 2d 2e 30 | 35 35 30 37 20 2d 2e 30 |6736 -.0|5507 -.0|
|00005090| 33 31 33 38 35 20 2e 30 | 32 39 31 39 37 20 2e 30 |31385 .0|29197 .0|
|000050a0| 33 32 31 31 37 20 2d 2e | 30 30 30 33 36 34 20 2d |32117 -.|000364 -|
|000050b0| 2e 30 31 33 33 39 36 20 | 2d 2e 30 31 30 38 39 39 |.013396 |-.010899|
|000050c0| 20 2d 2e 30 30 36 36 33 | 39 20 2e 30 30 36 37 34 | -.00663|9 .00674|
|000050d0| 36 20 2e 30 31 32 36 31 | 37 20 2e 30 30 33 34 31 |6 .01261|7 .00341|
|000050e0| 33 00 00 0a 4d 65 72 63 | 75 72 79 20 52 2e 41 2e |3...Merc|ury R.A.|
|000050f0| 20 3d 20 32 30 68 20 31 | 35 6d 0d 4d 65 72 63 75 | = 20h 1|5m.Mercu|
|00005100| 72 79 20 44 65 63 2e 20 | 20 3d 20 2d 31 38 a1 20 |ry Dec. | = -18. |
|00005110| 32 39 27 0d 41 7a 2e 20 | 3d 20 31 35 38 0d 41 6c |29'.Az. |= 158.Al|
|00005120| 74 2e 20 3d 20 33 33 0d | 33 30 33 2e 38 37 0d 2d |t. = 33.|303.87.-|
|00005130| 31 38 2e 34 38 35 00 00 | 06 55 6e 69 76 65 72 73 |18.485..|.Univers|
|00005140| 61 6c 20 54 69 6d 65 20 | 3d 20 31 37 3a 32 33 0d |al Time |= 17:23.|
|00005150| 31 37 2e 33 38 38 0d 33 | 36 38 00 00 0d 4d 65 72 |17.388.3|68...Mer|
|00005160| 63 75 72 79 20 52 69 73 | 65 73 20 61 74 20 38 3a |cury Ris|es at 8:|
|00005170| 33 37 20 41 4d 0d 4d 65 | 72 63 75 72 79 20 53 65 |37 AM.Me|rcury Se|
|00005180| 74 73 20 20 61 74 20 36 | 3a 34 35 20 50 4d 0d 33 |ts at 6|:45 PM.3|
|00005190| 37 2e 36 39 33 0d 38 2e | 36 32 38 0d 31 38 2e 37 |7.693.8.|628.18.7|
|000051a0| 35 38 00 00 0e 4d 65 72 | 63 75 72 79 00 00 1c 32 |58...Mer|cury...2|
|000051b0| 20 4a 61 6e 75 61 72 79 | 20 31 39 38 39 00 00 1f | January| 1989...|
|000051c0| 4a 75 6c 69 61 6e 20 44 | 61 74 65 20 3d 20 32 34 |Julian D|ate = 24|
|000051d0| 34 37 35 32 39 2e 32 32 | 35 00 00 25 39 25 00 4d |47529.22|5..%9%.M|
|000051e0| 65 72 63 75 72 79 00 00 | 00 00 00 00 00 00 00 00 |ercury..|........|
|000051f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005200| 00 00 00 80 42 4d 41 50 | 00 00 20 2b 00 00 00 00 |....BMAP|.. +....|
|00005210| 00 01 00 00 00 00 00 00 | 01 56 02 00 00 53 01 31 |........|.V...S.1|
|00005220| 01 56 02 00 01 2f 01 31 | 01 56 02 00 00 00 00 00 |.V.../.1|.V......|
|00005230| 00 00 00 00 00 00 00 28 | 00 00 00 1c 8d 1d 10 14 |.......(|........|
|00005240| 80 09 bd 85 bf 81 bf 81 | bf 81 bf 81 bf 81 bf 81 |........|........|
|00005250| a4 81 15 40 e1 06 85 12 | 40 12 40 e1 06 bf 85 a5 |...@....|@.@.....|
|00005260| 85 10 13 01 8e 15 40 e1 | 06 8d 15 40 e1 06 8b 32 |......@.|...@...2|
|00005270| 55 55 55 e1 07 42 2a aa | aa 80 e1 06 bf 86 a4 86 |UUU..B*.|........|
|00005280| 00 00 04 e0 43 41 52 44 | 00 00 12 8a 00 00 0e d8 |....CARD|........|
|00005290| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 22 b1 |........|......".|
|000052a0| 00 00 0a cd 00 00 00 0f | 00 00 00 00 00 0a 00 00 |........|........|
|000052b0| 04 9e 00 07 53 69 64 65 | 72 65 61 6c 20 54 69 6d |....Side|real Tim|
|000052c0| 65 20 3d 20 31 38 3a 35 | 37 0d 31 38 2e 39 36 31 |e = 18:5|7.18.961|
|000052d0| 00 00 08 36 33 2e 36 31 | 33 32 39 34 20 31 34 2e |...63.61|3294 14.|
|000052e0| 31 34 39 33 37 39 33 20 | 2d 2e 36 34 36 32 36 37 |1493793 |-.646267|
|000052f0| 34 20 2d 2e 33 30 34 38 | 36 31 20 2d 2e 32 31 31 |4 -.3048|61 -.211|
|00005300| 34 33 36 36 20 2d 2e 30 | 37 33 32 34 31 33 20 2d |4366 -.0|732413 -|
|00005310| 2e 31 36 33 30 36 38 35 | 20 2d 2e 30 38 30 30 34 |.1630685| -.08004|
|00005320| 35 32 20 2e 30 35 33 38 | 39 39 32 20 2e 30 31 37 |52 .0538|992 .017|
|00005330| 34 39 30 35 20 2d 2e 30 | 31 35 37 38 38 38 20 2d |4905 -.0|157888 -|
|00005340| 2e 30 30 32 36 38 36 34 | 20 2e 30 30 34 33 31 34 |.0026864| .004314|
|00005350| 38 20 2d 2e 30 30 30 34 | 32 30 39 20 2d 2e 30 30 |8 -.0004|209 -.00|
|00005360| 31 38 39 34 37 20 2e 30 | 30 31 31 33 30 37 20 2e |18947 .0|011307 .|
|00005370| 30 30 31 32 36 33 37 20 | 2d 2e 30 30 30 33 35 39 |0012637 |-.000359|
|00005380| 20 2d 2e 30 30 30 33 36 | 33 34 20 2e 30 30 30 31 | -.00036|34 .0001|
|00005390| 32 35 34 20 2e 30 30 30 | 30 35 32 37 20 2d 2e 30 |254 .000|0527 -.0|
|000053a0| 30 30 31 32 36 37 20 2d | 2e 30 30 30 30 33 30 36 |001267 -|.0000306|
|000053b0| 20 2e 30 30 30 30 37 31 | 32 20 2e 30 30 30 30 31 | .000071|2 .00001|
|000053c0| 39 31 20 2e 30 30 30 30 | 31 37 34 20 2e 30 30 30 |91 .0000|174 .000|
|000053d0| 30 32 36 34 20 2e 30 30 | 30 30 30 33 32 20 2d 2e |0264 .00|00032 -.|
|000053e0| 30 30 30 30 31 32 32 20 | 2d 2e 30 30 30 30 33 38 |0000122 |-.000038|
|000053f0| 39 20 2d 2e 30 30 30 30 | 31 39 33 20 2e 30 30 30 |9 -.0000|193 .000|
|00005400| 30 31 34 35 20 2e 30 30 | 30 30 30 39 33 20 2e 30 |0145 .00|00093 .0|
|00005410| 30 30 30 32 32 35 20 2e | 30 30 30 30 31 32 36 20 |000225 .|0000126 |
|00005420| 2d 2e 30 30 30 30 33 30 | 38 20 2d 2e 30 30 30 30 |-.000030|8 -.0000|
|00005430| 32 30 38 20 2e 30 30 30 | 30 32 31 32 20 2e 30 30 |208 .000|0212 .00|
|00005440| 30 30 31 35 38 20 2d 2e | 30 30 30 30 31 31 31 20 |00158 -.|0000111 |
|00005450| 2d 2e 30 30 30 30 30 35 | 35 20 2e 30 30 30 30 30 |-.000005|5 .00000|
|00005460| 35 31 20 2e 30 30 30 30 | 30 31 20 2d 2e 30 30 30 |51 .0000|01 -.000|
|00005470| 30 30 32 39 20 2d 2e 30 | 30 30 30 30 30 34 20 2e |0029 -.0|000004 .|
|00005480| 30 30 30 30 30 31 37 20 | 2d 2e 30 30 30 30 30 30 |0000017 |-.000000|
|00005490| 39 20 2d 2e 30 30 30 30 | 30 30 35 20 2e 30 30 30 |9 -.0000|005 .000|
|000054a0| 30 30 30 39 20 2e 30 30 | 30 30 30 30 33 00 00 09 |0009 .00|00003...|
|000054b0| 20 2d 32 30 2e 32 30 39 | 35 38 37 20 2d 33 2e 32 | -20.209|587 -3.2|
|000054c0| 35 32 32 34 20 2d 31 38 | 2e 30 36 32 39 33 38 20 |5224 -18|.062938 |
|000054d0| 39 2e 30 30 34 37 32 32 | 20 31 30 2e 36 33 33 35 |9.004722| 10.6335|
|000054e0| 31 31 20 2d 33 2e 33 30 | 34 35 36 33 20 2d 31 2e |11 -3.30|4563 -1.|
|000054f0| 39 38 35 33 32 36 20 2e | 32 35 39 37 37 37 20 2e |985326 .|259777 .|
|00005500| 31 30 31 38 39 35 20 2d | 2e 31 33 30 30 32 32 20 |101895 -|.130022 |
|00005510| 2d 2e 30 30 34 35 30 31 | 20 2e 30 39 37 32 36 33 |-.004501| .097263|
|00005520| 20 2e 30 30 31 33 36 32 | 20 2d 2e 30 33 37 35 35 | .001362| -.03755|
|00005530| 31 20 2e 30 30 30 39 38 | 35 20 2e 30 31 30 30 32 |1 .00098|5 .01002|
|00005540| 32 20 2d 2e 30 30 31 37 | 32 20 2d 2e 30 30 32 35 |2 -.0017|2 -.0025|
|00005550| 35 33 20 2e 30 30 31 37 | 33 36 20 2e 30 30 30 37 |53 .0017|36 .0007|
|00005560| 39 32 20 2d 2e 30 30 31 | 31 30 37 20 2d 2e 30 30 |92 -.001|107 -.00|
|00005570| 30 34 34 37 20 2e 30 30 | 30 33 33 34 20 2e 30 30 |0447 .00|0334 .00|
|00005580| 30 31 37 33 20 2d 2e 30 | 30 30 31 31 31 20 2e 30 |0173 -.0|00111 .0|
|00005590| 30 30 31 32 20 2e 30 30 | 30 31 31 37 20 2d 2e 30 |0012 .00|0117 -.0|
|000055a0| 30 30 30 37 20 2e 30 30 | 30 30 34 32 20 2d 2e 30 |0007 .00|0042 -.0|
|000055b0| 30 30 30 34 35 20 2d 2e | 30 30 30 30 31 37 20 2e |00045 -.|000017 .|
|000055c0| 30 30 30 30 35 20 2d 2e | 30 30 30 31 34 32 20 2d |00005 -.|000142 -|
|000055d0| 2e 30 30 30 30 36 20 2e | 30 30 30 31 33 35 20 2e |.00006 .|000135 .|
|000055e0| 30 30 30 30 37 35 20 2e | 30 30 30 30 30 34 20 2d |000075 .|000004 -|
|000055f0| 2e 30 30 30 30 36 33 20 | 2d 2e 30 30 30 31 31 38 |.000063 |-.000118|
|00005600| 20 2e 30 30 30 30 34 31 | 20 2e 30 30 30 31 33 20 | .000041| .00013 |
|00005610| 2d 2e 30 30 30 30 31 37 | 20 2d 2e 30 30 30 30 38 |-.000017| -.00008|
|00005620| 20 2e 30 30 30 30 30 37 | 20 2e 30 30 30 30 34 32 | .000007| .000042|
|00005630| 20 2d 2e 30 30 30 30 30 | 38 20 2d 2e 30 30 30 30 | -.00000|8 -.0000|
|00005640| 32 20 2e 30 30 30 30 30 | 34 20 2e 30 30 30 30 30 |2 .00000|4 .00000|
|00005650| 32 20 2d 2e 30 30 30 30 | 30 32 00 00 0a 56 65 6e |2 -.0000|02...Ven|
|00005660| 75 73 20 52 2e 41 2e 20 | 3d 20 31 37 68 20 31 37 |us R.A. |= 17h 17|
|00005670| 6d 0d 56 65 6e 75 73 20 | 44 65 63 2e 20 20 3d 20 |m.Venus |Dec. = |
|00005680| 2d 32 32 a1 20 31 33 27 | 0d 41 7a 2e 20 3d 20 32 |-22. 13'|.Az. = 2|
|00005690| 30 36 0d 41 6c 74 2e 20 | 3d 20 32 37 0d 32 35 39 |06.Alt. |= 27.259|
|000056a0| 2e 33 34 33 0d 2d 32 32 | 2e 32 32 34 00 00 06 55 |.343.-22|.224...U|
|000056b0| 6e 69 76 65 72 73 61 6c | 20 54 69 6d 65 20 3d 20 |niversal| Time = |
|000056c0| 31 37 3a 32 33 0d 31 37 | 2e 33 39 36 0d 33 36 38 |17:23.17|.396.368|
|000056d0| 00 00 0d 56 65 6e 75 73 | 20 52 69 73 65 73 20 61 |...Venus| Rises a|
|000056e0| 74 20 35 3a 35 32 20 41 | 4d 0d 56 65 6e 75 73 20 |t 5:52 A|M.Venus |
|000056f0| 53 65 74 73 20 20 61 74 | 20 33 3a 33 34 20 50 4d |Sets at| 3:34 PM|
|00005700| 0d 33 34 2e 37 32 35 0d | 35 2e 38 37 33 0d 31 35 |.34.725.|5.873.15|
|00005710| 2e 35 37 37 00 00 0e 56 | 65 6e 75 73 00 00 1c 32 |.577...V|enus...2|
|00005720| 20 4a 61 6e 75 61 72 79 | 20 31 39 38 39 00 00 1f | January| 1989...|
|00005730| 4a 75 6c 69 61 6e 20 44 | 61 74 65 20 3d 20 32 34 |Julian D|ate = 24|
|00005740| 34 37 35 32 39 2e 32 32 | 35 00 00 25 32 34 25 00 |47529.22|5..%24%.|
|00005750| 56 65 6e 75 73 00 00 00 | 00 00 00 00 00 00 00 00 |Venus...|........|
|00005760| 00 00 00 40 42 4d 41 50 | 00 00 0e d8 00 00 00 00 |...@BMAP|........|
|00005770| 00 01 00 00 00 00 00 00 | 01 56 02 00 00 77 01 8a |........|.V...w..|
|00005780| 00 95 01 af 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005790| 00 00 00 00 00 00 00 00 | 00 00 00 00 14 ab 00 04 |........|........|
|000057a0| 00 00 02 60 43 41 52 44 | 00 00 08 9c 00 00 09 e3 |...`CARD|........|
|000057b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 22 b1 |........|......".|
|000057c0| 00 00 0a cd 00 00 00 14 | 00 00 00 00 00 0a 00 00 |........|........|
|000057d0| 02 11 00 09 39 2e 34 36 | 35 30 35 37 20 2d 31 38 |....9.46|5057 -18|
|000057e0| 2e 36 39 37 30 39 35 20 | 2d 31 32 2e 38 39 34 30 |.697095 |-12.8940|
|000057f0| 32 36 20 33 2e 37 32 39 | 33 31 37 20 31 2e 33 30 |26 3.729|317 1.30|
|00005800| 36 39 31 32 20 2d 2e 32 | 38 34 32 33 35 20 2e 30 |6912 -.2|84235 .0|
|00005810| 34 36 34 38 38 20 2e 30 | 33 35 36 39 33 20 2d 2e |46488 .0|35693 -.|
|00005820| 30 31 34 31 38 20 2d 2e | 30 30 35 30 30 32 20 2e |01418 -.|005002 .|
|00005830| 30 30 32 34 32 39 20 2d | 2e 30 30 30 30 38 35 20 |002429 -|.000085 |
|00005840| 2d 2e 30 30 30 33 39 36 | 20 2e 30 30 30 30 30 36 |-.000396| .000006|
|00005850| 00 00 08 31 37 2e 35 31 | 39 39 35 30 36 20 37 2e |...17.51|99506 7.|
|00005860| 36 39 37 33 35 33 34 20 | 2e 30 33 33 35 39 37 31 |6973534 |.0335971|
|00005870| 20 2d 2e 30 31 38 35 36 | 32 33 20 2e 31 32 35 31 | -.01856|23 .1251|
|00005880| 31 34 37 20 2d 2e 30 30 | 32 32 37 32 20 2d 2e 30 |147 -.00|2272 -.0|
|00005890| 31 34 34 35 30 38 20 2e | 30 30 30 34 36 35 35 20 |144508 .|0004655 |
|000058a0| 2e 30 30 31 37 35 30 35 | 20 2d 2e 30 30 31 30 34 |.0017505| -.00104|
|000058b0| 36 32 20 2d 2e 30 30 30 | 30 36 36 34 20 2e 30 30 |62 -.000|0664 .00|
|000058c0| 30 31 39 34 34 20 2d 2e | 30 30 30 30 30 34 36 20 |01944 -.|0000046 |
|000058d0| 2d 2e 30 30 30 30 33 32 | 39 00 00 0a 4d 61 72 73 |-.000032|9...Mars|
|000058e0| 20 52 2e 41 2e 20 3d 20 | 31 68 20 31 37 6d 0d 4d | R.A. = |1h 17m.M|
|000058f0| 61 72 73 20 44 65 63 2e | 20 20 3d 20 2b 38 a1 20 |ars Dec.| = +8. |
|00005900| 34 39 27 0d 41 7a 2e 20 | 3d 20 38 30 0d 41 6c 74 |49'.Az. |= 80.Alt|
|00005910| 2e 20 3d 20 31 0d 31 39 | 2e 33 37 36 0d 38 2e 38 |. = 1.19|.376.8.8|
|00005920| 32 33 00 00 07 53 69 64 | 65 72 65 61 6c 20 54 69 |23...Sid|ereal Ti|
|00005930| 6d 65 20 3d 20 31 38 3a | 35 38 0d 31 38 2e 39 36 |me = 18:|58.18.96|
|00005940| 39 00 00 06 55 6e 69 76 | 65 72 73 61 6c 20 54 69 |9...Univ|ersal Ti|
|00005950| 6d 65 20 3d 20 31 37 3a | 32 34 0d 31 37 2e 34 30 |me = 17:|24.17.40|
|00005960| 34 0d 33 36 38 00 00 0d | 4d 61 72 73 20 52 69 73 |4.368...|Mars Ris|
|00005970| 65 73 20 61 74 20 31 32 | 3a 31 37 20 50 4d 0d 4d |es at 12|:17 PM.M|
|00005980| 61 72 73 20 53 65 74 73 | 20 20 61 74 20 31 3a 30 |ars Sets| at 1:0|
|00005990| 39 20 41 4d 0d 31 38 2e | 37 32 37 0d 31 32 2e 32 |9 AM.18.|727.12.2|
|000059a0| 39 36 0d 31 2e 31 35 37 | 00 00 0e 4d 61 72 73 00 |96.1.157|...Mars.|
|000059b0| 00 1c 32 20 4a 61 6e 75 | 61 72 79 20 31 39 38 39 |..2 Janu|ary 1989|
|000059c0| 00 00 1f 4a 75 6c 69 61 | 6e 20 44 61 74 65 20 3d |...Julia|n Date =|
|000059d0| 20 32 34 34 37 35 32 39 | 2e 32 32 35 00 00 25 33 | 2447529|.225..%3|
|000059e0| 38 25 00 4d 61 72 73 00 | 00 00 00 00 00 00 00 00 |8%.Mars.|........|
|000059f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005a00| 00 00 00 40 42 4d 41 50 | 00 00 09 e3 00 00 00 00 |...@BMAP|........|
|00005a10| 00 01 00 00 00 00 00 00 | 01 56 02 00 00 93 01 8c |........|.V......|
|00005a20| 00 b1 01 b1 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005a30| 00 00 00 00 00 00 00 00 | 00 00 00 00 01 53 00 02 |........|.....S..|
|00005a40| 00 00 0d c0 43 41 52 44 | 00 00 0c 04 00 00 1c d7 |....CARD|........|
|00005a50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 22 b1 |........|......".|
|00005a60| 00 00 0a cd 00 05 00 16 | 00 00 03 0c 00 0b 00 00 |........|........|
|00005a70| 02 8f 01 38 00 10 01 00 | 00 b5 01 8e 00 cd 01 b5 |...8....|........|
|00005a80| 00 00 00 00 7c cd 00 01 | 00 00 00 0c 00 00 00 10 |....|...|........|
|00005a90| 53 61 74 65 6c 6c 69 74 | 65 00 00 6f 6e 20 6d 6f |Satellit|e..on mo|
|00005aa0| 75 73 65 55 70 0d 67 65 | 74 20 74 68 65 20 73 65 |useUp.ge|t the se|
|00005ab0| 63 6f 6e 64 73 0d 61 64 | 64 20 44 53 54 63 68 65 |conds.ad|d DSTche|
|00005ac0| 63 6b 28 29 2a 33 36 30 | 30 20 74 6f 20 69 74 0d |ck()*360|0 to it.|
|00005ad0| 63 6f 6e 76 65 72 74 20 | 69 74 20 74 6f 20 64 61 |convert |it to da|
|00005ae0| 74 65 69 74 65 6d 73 0d | 70 75 74 20 69 74 65 6d |teitems.|put item|
|00005af0| 20 31 20 6f 66 20 69 74 | 20 69 6e 74 6f 20 6c 69 | 1 of it| into li|
|00005b00| 6e 65 20 33 20 6f 66 20 | 6a 6f 65 0d 70 75 74 20 |ne 3 of |joe.put |
|00005b10| 69 74 65 6d 20 32 20 6f | 66 20 69 74 20 69 6e 74 |item 2 o|f it int|
|00005b20| 6f 20 6c 69 6e 65 20 31 | 20 6f 66 20 6a 6f 65 0d |o line 1| of joe.|
|00005b30| 70 75 74 20 69 74 65 6d | 20 33 20 6f 66 20 69 74 |put item| 3 of it|
|00005b40| 20 2b 28 69 74 65 6d 20 | 34 20 6f 66 20 69 74 29 | +(item |4 of it)|
|00005b50| 2f 32 34 20 2b 20 28 69 | 74 65 6d 20 35 20 6f 66 |/24 + (i|tem 5 of|
|00005b60| 20 69 74 29 2f 31 34 34 | 30 20 69 6e 74 6f 20 6c | it)/144|0 into l|
|00005b70| 69 6e 65 20 32 c2 0d 6f | 66 20 6a 6f 65 0d 50 75 |ine 2..o|f joe.Pu|
|00005b80| 74 43 6c 69 70 62 6f 61 | 72 64 28 6a 6f 65 29 0d |tClipboa|rd(joe).|
|00005b90| 6f 70 65 6e 20 22 4a 53 | 41 54 22 0d 65 6e 64 20 |open "JS|AT".end |
|00005ba0| 6d 6f 75 73 65 55 70 0d | 00 00 00 26 00 12 02 00 |mouseUp.|...&....|
|00005bb0| 00 b8 00 29 01 1a 01 5c | 00 07 00 00 00 00 00 00 |...)...\|........|
|00005bc0| 00 16 00 0c 00 00 00 10 | 74 6f 74 61 6c 00 00 00 |........|total...|
|00005bd0| 00 9c 00 13 01 00 01 39 | 00 06 01 4e 00 57 80 03 |.......9|...N.W..|
|00005be0| 00 00 00 00 00 01 00 00 | 00 0c 00 00 00 10 54 6f |........|......To|
|00005bf0| 64 61 79 00 00 6f 6e 20 | 6d 6f 75 73 65 55 70 0d |day..on |mouseUp.|
|00005c00| 70 75 74 20 63 68 61 72 | 20 31 20 74 6f 20 33 20 |put char| 1 to 3 |
|00005c10| 6f 66 20 73 65 63 6f 6e | 64 20 77 6f 72 64 20 6f |of secon|d word o|
|00005c20| 66 20 67 65 74 4a 44 44 | 61 74 65 28 29 20 26 26 |f getJDD|ate() &&|
|00005c30| 20 c2 0d 66 69 72 73 74 | 20 77 6f 72 64 20 6f 66 | ..first| word of|
|00005c40| 20 67 65 74 4a 44 44 61 | 74 65 28 29 20 69 6e 74 | getJDDa|te() int|
|00005c50| 6f 20 68 65 0d 66 65 74 | 63 68 20 68 65 0d 65 6e |o he.fet|ch he.en|
|00005c60| 64 20 6d 6f 75 73 65 55 | 70 0d 00 00 00 76 00 15 |d mouseU|p....v..|
|00005c70| 01 00 01 39 01 1b 01 4e | 01 6c a0 03 00 00 00 00 |...9...N|.l......|
|00005c80| 00 01 00 00 00 0c 00 00 | 00 10 4f 74 68 65 72 20 |........|..Other |
|00005c90| 44 61 79 73 00 00 6f 6e | 20 6d 6f 75 73 65 55 70 |Days..on| mouseUp|
|00005ca0| 0d 41 73 6b 20 22 45 6e | 74 65 72 20 64 61 74 65 |.Ask "En|ter date|
|00005cb0| 20 28 6d 6f 6e 20 64 64 | 29 3a 22 0d 70 75 74 20 | (mon dd|):".put |
|00005cc0| 69 74 20 69 6e 74 6f 20 | 68 65 0d 66 65 74 63 68 |it into |he.fetch|
|00005cd0| 20 68 65 0d 65 6e 64 20 | 6d 6f 75 73 65 55 70 0d | he.end |mouseUp.|
|00005ce0| 00 00 00 9c 00 16 01 00 | 01 39 00 5a 01 4e 00 ab |........|.9.Z.N..|
|00005cf0| a0 03 00 00 00 00 00 01 | 00 00 00 0c 00 00 00 10 |........|........|
|00005d00| 54 6f 6d 6f 72 72 6f 77 | 00 00 6f 6e 20 6d 6f 75 |Tomorrow|..on mou|
|00005d10| 73 65 55 70 0d 70 75 74 | 20 63 68 61 72 20 31 20 |seUp.put| char 1 |
|00005d20| 74 6f 20 33 20 6f 66 20 | 73 65 63 6f 6e 64 20 77 |to 3 of |second w|
|00005d30| 6f 72 64 20 6f 66 20 54 | 4a 44 44 61 74 65 28 29 |ord of T|JDDate()|
|00005d40| 20 26 26 20 c2 0d 66 69 | 72 73 74 20 77 6f 72 64 | && ..fi|rst word|
|00005d50| 20 6f 66 20 54 4a 44 44 | 61 74 65 28 29 20 69 6e | of TJDD|ate() in|
|00005d60| 74 6f 20 68 65 0d 66 65 | 74 63 68 20 68 65 0d 65 |to he.fe|tch he.e|
|00005d70| 6e 64 20 6d 6f 75 73 65 | 55 70 0d 0d 00 00 00 07 |nd mouse|Up......|
|00005d80| 53 69 64 65 72 65 61 6c | 20 54 69 6d 65 20 3d 20 |Sidereal| Time = |
|00005d90| 31 39 3a 31 33 0d 31 39 | 2e 32 33 31 00 00 08 31 |19:13.19|.231...1|
|00005da0| 30 2e 35 33 32 33 37 33 | 20 31 2e 37 35 30 39 32 |0.532373| 1.75092|
|00005db0| 34 31 20 2d 2e 32 38 38 | 39 35 35 34 20 2d 2e 34 |41 -.288|9554 -.4|
|00005dc0| 30 36 35 39 35 36 20 2e | 30 31 36 38 35 30 32 20 |065956 .|0168502 |
|00005dd0| 2e 30 31 32 31 35 35 39 | 20 2e 30 31 31 37 38 36 |.0121559| .011786|
|00005de0| 33 20 2e 30 30 36 35 30 | 35 37 20 2e 30 30 30 34 |3 .00650|57 .0004|
|00005df0| 37 31 31 20 2e 30 30 30 | 30 34 32 38 20 2d 2e 30 |711 .000|0428 -.0|
|00005e00| 30 30 33 39 37 32 20 2d | 2e 30 30 30 31 38 36 37 |003972 -|.0001867|
|00005e10| 20 2d 2e 30 30 30 30 34 | 39 31 20 2d 2e 30 30 30 | -.00004|91 -.000|
|00005e20| 30 30 36 00 00 09 34 32 | 2e 38 34 33 34 38 39 20 |006...42|.843489 |
|00005e30| 32 2e 34 38 33 34 37 38 | 20 2d 2e 39 35 36 32 34 |2.483478| -.95624|
|00005e40| 34 20 2d 2e 30 34 30 32 | 35 31 20 2e 34 39 31 33 |4 -.0402|51 .4913|
|00005e50| 38 39 20 2d 2e 31 30 36 | 37 39 38 20 2d 2e 30 36 |89 -.106|798 -.06|
|00005e60| 36 31 34 39 20 2d 2e 30 | 30 32 33 37 39 20 2d 2e |6149 -.0|02379 -.|
|00005e70| 30 30 31 38 31 32 20 2e | 30 30 34 33 35 32 20 2e |001812 .|004352 .|
|00005e80| 30 30 31 35 38 37 20 2e | 30 30 30 33 38 20 2e 30 |001587 .|00038 .0|
|00005e90| 20 2d 2e 30 30 30 31 37 | 32 00 00 0a 4a 75 70 69 | -.00017|2...Jupi|
|00005ea0| 74 65 72 20 52 2e 41 2e | 20 3d 20 33 68 20 33 38 |ter R.A.| = 3h 38|
|00005eb0| 6d 0d 4a 75 70 69 74 65 | 72 20 44 65 63 2e 20 20 |m.Jupite|r Dec. |
|00005ec0| 3d 20 2b 31 38 a1 20 33 | 31 27 0d 62 65 6c 6f 77 |= +18. 3|1'.below|
|00005ed0| 20 45 20 68 6f 72 69 7a | 6f 6e 0d 0d 35 34 2e 35 | E horiz|on..54.5|
|00005ee0| 32 31 0d 31 38 2e 35 33 | 32 00 00 06 55 6e 69 76 |21.18.53|2...Univ|
|00005ef0| 65 72 73 61 6c 20 54 69 | 6d 65 20 3d 20 31 37 3a |ersal Ti|me = 17:|
|00005f00| 33 39 0d 31 37 2e 36 36 | 35 0d 33 36 38 00 00 0d |39.17.66|5.368...|
|00005f10| 4a 75 70 69 74 65 72 20 | 52 69 73 65 73 20 61 74 |Jupiter |Rises at|
|00005f20| 20 32 3a 30 37 20 50 4d | 0d 4a 75 70 69 74 65 72 | 2:07 PM|.Jupiter|
|00005f30| 20 53 65 74 73 20 20 61 | 74 20 34 3a 30 30 20 41 | Sets a|t 4:00 A|
|00005f40| 4d 0d 32 31 2e 30 37 0d | 31 34 2e 31 33 33 0d 34 |M.21.07.|14.133.4|
|00005f50| 2e 30 30 37 00 00 0e 4a | 75 70 69 74 65 72 00 00 |.007...J|upiter..|
|00005f60| 1f 4a 75 6c 69 61 6e 20 | 44 61 74 65 20 3d 20 32 |.Julian |Date = 2|
|00005f70| 34 34 37 35 32 39 2e 32 | 33 36 00 00 1c 32 20 4a |447529.2|36...2 J|
|00005f80| 61 6e 75 61 72 79 20 31 | 39 38 39 00 00 25 34 39 |anuary 1|989..%49|
|00005f90| 25 00 ff ee 4a 55 50 49 | 54 45 52 20 53 41 54 45 |%...JUPI|TER SATE|
|00005fa0| 4c 4c 49 54 45 20 45 43 | 4c 49 50 53 45 20 45 56 |LLITE EC|LIPSE EV|
|00005fb0| 45 4e 54 53 20 0d 44 41 | 54 45 20 20 20 54 69 6d |ENTS .DA|TE Tim|
|00005fc0| 65 28 55 54 29 20 53 50 | 20 52 61 64 69 69 0d 4a |e(UT) SP| Radii.J|
|00005fd0| 41 4e 20 30 34 20 30 36 | 3a 32 38 2e 38 20 20 32 |AN 04 06|:28.8 2|
|00005fe0| 52 20 31 2e 32 20 0d 4a | 41 4e 20 30 34 20 31 35 |R 1.2 .J|AN 04 15|
|00005ff0| 3a 30 34 2e 36 20 20 31 | 52 20 30 2e 38 20 28 6e |:04.6 1|R 0.8 (n|
|00006000| 6f 74 20 76 69 73 69 62 | 6c 65 29 0d 00 4a 75 70 |ot visib|le)..Jup|
|00006010| 69 74 65 72 00 6f 6e 20 | 6f 70 65 6e 43 61 72 64 |iter.on |openCard|
|00006020| 0d 70 75 74 20 63 68 61 | 72 20 31 20 74 6f 20 33 |.put cha|r 1 to 3|
|00006030| 20 6f 66 20 73 65 63 6f | 6e 64 20 77 6f 72 64 20 | of seco|nd word |
|00006040| 6f 66 20 67 65 74 4a 44 | 44 61 74 65 28 29 20 26 |of getJD|Date() &|
|00006050| 26 20 66 69 72 73 74 20 | 77 6f 72 64 20 6f 66 20 |& first |word of |
|00006060| c2 0d 67 65 74 4a 44 44 | 61 74 65 28 29 20 69 6e |..getJDD|ate() in|
|00006070| 74 6f 20 68 65 0d 69 66 | 20 6e 6f 74 20 28 28 73 |to he.if| not ((s|
|00006080| 65 63 6f 6e 64 20 77 6f | 72 64 20 6f 66 20 68 65 |econd wo|rd of he|
|00006090| 29 20 3d 20 66 69 72 73 | 74 20 77 6f 72 64 20 6f |) = firs|t word o|
|000060a0| 66 20 66 69 65 6c 64 20 | 22 64 61 74 65 22 29 20 |f field |"date") |
|000060b0| 74 68 65 6e 20 66 65 74 | 63 68 20 68 65 0d 70 61 |then fet|ch he.pa|
|000060c0| 73 73 20 6f 70 65 6e 43 | 61 72 64 0d 65 6e 64 20 |ss openC|ard.end |
|000060d0| 6f 70 65 6e 43 61 72 64 | 0d 0d 6f 6e 20 66 65 74 |openCard|..on fet|
|000060e0| 63 68 20 68 65 0d 67 6c | 6f 62 61 6c 20 72 65 63 |ch he.gl|obal rec|
|000060f0| 0d 70 75 74 20 22 4a 41 | 4e 2c 46 45 42 2c 4d 41 |.put "JA|N,FEB,MA|
|00006100| 52 2c 41 50 52 2c 4d 41 | 59 2c 4a 55 4e 2c 4a 55 |R,APR,MA|Y,JUN,JU|
|00006110| 4c 2c 41 55 47 2c 53 45 | 50 2c 4f 43 54 2c 4e 4f |L,AUG,SE|P,OCT,NO|
|00006120| 56 2c 44 45 43 22 20 69 | 6e 74 6f 20 6d 6f 6e 74 |V,DEC" i|nto mont|
|00006130| 68 73 0d 69 66 20 68 65 | 20 69 73 20 65 6d 70 74 |hs.if he| is empt|
|00006140| 79 20 74 68 65 6e 20 65 | 78 69 74 20 66 65 74 63 |y then e|xit fetc|
|00006150| 68 0d 69 66 20 6e 75 6d | 62 65 72 20 6f 66 20 63 |h.if num|ber of c|
|00006160| 68 61 72 73 20 6f 66 20 | 68 65 3d 35 20 74 68 65 |hars of |he=5 the|
|00006170| 6e 20 70 75 74 20 22 30 | 22 20 61 66 74 65 72 20 |n put "0|" after |
|00006180| 63 68 61 72 20 34 20 6f | 66 20 68 65 0d 2d 2d 20 |char 4 o|f he.-- |
|00006190| 69 6d 70 6f 72 74 20 74 | 65 78 74 20 20 70 75 74 |import t|ext put|
|000061a0| 20 70 72 6f 70 65 72 20 | 70 61 74 68 6e 61 6d 65 | proper |pathname|
|000061b0| 20 68 65 72 65 0d 70 75 | 74 20 22 48 61 72 64 20 | here.pu|t "Hard |
|000061c0| 44 69 73 6b 3a 41 73 74 | 72 6f 6e 6f 6d 79 3a 47 |Disk:Ast|ronomy:G|
|000061d0| 61 6c 69 6c 65 61 6e 20 | 45 63 6c 69 70 73 65 73 |alilean |Eclipses|
|000061e0| 3a 22 20 26 20 6c 61 73 | 74 20 77 6f 72 64 20 6f |:" & las|t word o|
|000061f0| 66 20 74 68 65 20 6c 6f | 6e 67 20 c2 0d 64 61 74 |f the lo|ng ..dat|
|00006200| 65 20 69 6e 74 6f 20 66 | 69 6c 65 4e 61 6d 65 0d |e into f|ileName.|
|00006210| 72 65 70 65 61 74 20 77 | 69 74 68 20 6d 6f 6e 74 |repeat w|ith mont|
|00006220| 68 3d 31 20 74 6f 20 31 | 32 0d 69 66 20 69 74 65 |h=1 to 1|2.if ite|
|00006230| 6d 20 6d 6f 6e 74 68 20 | 6f 66 20 6d 6f 6e 74 68 |m month |of month|
|00006240| 73 20 69 73 20 69 6e 20 | 68 65 20 74 68 65 6e 20 |s is in |he then |
|00006250| 65 78 69 74 20 72 65 70 | 65 61 74 0d 65 6e 64 20 |exit rep|eat.end |
|00006260| 72 65 70 65 61 74 0d 69 | 66 20 74 68 65 20 73 68 |repeat.i|f the sh|
|00006270| 69 66 74 4b 65 79 20 69 | 73 20 75 70 20 61 6e 64 |iftKey i|s up and|
|00006280| 20 6e 75 6d 62 65 72 20 | 6f 66 20 6c 69 6e 65 73 | number |of lines|
|00006290| 20 6f 66 20 63 64 20 66 | 6c 64 20 31 20 ad 20 30 | of cd f|ld 1 . 0|
|000062a0| 20 74 68 65 6e 0d 73 65 | 6c 65 63 74 20 74 65 78 | then.se|lect tex|
|000062b0| 74 20 6f 66 20 63 64 20 | 66 6c 64 20 31 0d 64 6f |t of cd |fld 1.do|
|000062c0| 4d 65 6e 75 20 22 43 6c | 65 61 72 20 54 65 78 74 |Menu "Cl|ear Text|
|000062d0| 22 0d 65 6e 64 20 69 66 | 0d 70 75 74 20 6d 6f 6e |".end if|.put mon|
|000062e0| 74 68 26 63 68 61 72 20 | 35 20 74 6f 20 36 20 6f |th&char |5 to 6 o|
|000062f0| 66 20 68 65 20 69 6e 74 | 6f 20 74 61 72 67 65 74 |f he int|o target|
|00006300| 0d 6f 70 65 6e 20 66 69 | 6c 65 20 66 69 6c 65 4e |.open fi|le fileN|
|00006310| 61 6d 65 0d 72 65 70 65 | 61 74 0d 73 65 74 20 63 |ame.repe|at.set c|
|00006320| 75 72 73 6f 72 20 74 6f | 20 62 75 73 79 0d 72 65 |ursor to| busy.re|
|00006330| 61 64 20 66 72 6f 6d 20 | 66 69 6c 65 20 66 69 6c |ad from |file fil|
|00006340| 65 4e 61 6d 65 20 75 6e | 74 69 6c 20 22 26 22 0d |eName un|til "&".|
|00006350| 69 66 20 69 74 20 69 73 | 20 65 6d 70 74 79 20 74 |if it is| empty t|
|00006360| 68 65 6e 0d 65 78 69 74 | 20 72 65 70 65 61 74 0d |hen.exit| repeat.|
|00006370| 65 6e 64 20 69 66 0d 64 | 65 6c 65 74 65 20 6c 61 |end if.d|elete la|
|00006380| 73 74 20 63 68 61 72 20 | 6f 66 20 69 74 0d 69 66 |st char |of it.if|
|00006390| 20 69 74 20 63 6f 6e 74 | 61 69 6e 73 20 74 61 72 | it cont|ains tar|
|000063a0| 67 65 74 20 74 68 65 6e | 0d 65 78 69 74 20 72 65 |get then|.exit re|
|000063b0| 70 65 61 74 0d 65 6e 64 | 20 69 66 0d 69 66 20 74 |peat.end| if.if t|
|000063c0| 61 72 67 65 74 20 3c 20 | 63 68 61 72 20 34 20 74 |arget < |char 4 t|
|000063d0| 6f 20 37 20 6f 66 20 6c | 69 6e 65 20 32 20 6f 66 |o 7 of l|ine 2 of|
|000063e0| 20 69 74 20 74 68 65 6e | 0d 67 65 74 20 65 6d 70 | it then|.get emp|
|000063f0| 74 79 0d 65 78 69 74 20 | 72 65 70 65 61 74 0d 65 |ty.exit |repeat.e|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.